Dim CMD As New Odbc.OdbcCommand("SELECT PHOTO FROM EMPLOYEES WHERE FIRSTNAME='" djieDataGridView1.CurrentRow.Cells(0).Value.ToString "'", CON)
Dim RD As Odbc.OdbcDataReader = CMD.ExecuteReader
If RD.Read Then
djiePictureBox1.Image = djieGetDataToImage(RD.Item("PHOTO"))
End If
RD.Close()
|
