retrieving images from msaccess and displaying it in datagridview using vb.net
Private Sub fillgrid()
ds = New DataSet
dim msstream as
Dim i, j As Integer
' "select a.shr_foliono,shr_name,sum(no_of_shares) from shr_det a,shr_issue_det b"
cmd.CommandText = "SELECT a.shr_foliono, a.shr_name, Sum(b.no_of_shares) AS SumOfno_of_shares" & _
" FROM shr_det as a INNER JOIN shr_issue_det as b ON a.shr_foliono=b.shr_foliono" & _
" GROUP BY a.shr_foliono, a.shr_name"
adp = New OdbcDataAdapter(cmd)
adp.Fill(ds)
cmd.CommandText = "select photos from shr_det"
objreader = cmd.ExecuteReader()
i = 0
While objreader.Read()
Dim pict As Byte() = CType(objreader.Item(i), Byte())
Dim fs As FileStream
Dim str As String = Application.StartupPath + "\images\photos\exp.jpg"
If System.IO.File.Exists(str) Then
File.Delete(str)
End If
fs = New FileStream(str, FileMode.CreateNew)
For j = 78 To pict.Length - 78
fs.WriteByte(pict(j))
Next
DataGridView1.Rows.Add(Image.FromStream(fs))
'Me.DataGridView1.Rows.Add(<column1 value>, <column2 value>, bmp1, <column3 value>, <column4 value>)
i = i + 1
End While