Private Sub display_result_ND1() Try Dim adp As New OleDb.OleDbDataAdapter("select * FROM Bio_data_ND1 WHERE regno='" & TxtSearch.Text & "'", "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=..\..\ResultPrc.mdb;Persist Security Info=True") Dim ds As New DataSet adp.Fill(ds, "Bio_data_ND1") Dim bytes() As Byte = ds.Tables("Bio_data_ND1").Rows(0).Item("picpath") Dim img As Image = Image.FromStream(New System.IO.MemoryStream(bytes)) PictureBox2.Image = img Catch ex As Exception MsgBox(ex.Message) End Try end sub
regno
select * FROM Bio_data_ND1 WHERE regno=?
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)