03-08-16, 11:25 PM
هذا هو الكود ولكن يعطي خطا Parameter is not valid
Sub retriveimage()
Dim dt As DataTable = New DAL().selectdatatable("select lablogo from labdetails")
Dim img_buffer() As Byte = dt.Rows(0).Item("lablogo")
Dim img_stream As New MemoryStream(img_buffer)
img_stream.Write(img_buffer, 0, img_buffer.Length)
' Pic.Image = Image.FromStream(img_stream)
Pic.Image = Image.FromStream(img_stream)
Pic.SizeMode = PictureBoxSizeMode.StretchImage
img_stream.Close()
End Sub
Sub retriveimage()
Dim dt As DataTable = New DAL().selectdatatable("select lablogo from labdetails")
Dim img_buffer() As Byte = dt.Rows(0).Item("lablogo")
Dim img_stream As New MemoryStream(img_buffer)
img_stream.Write(img_buffer, 0, img_buffer.Length)
' Pic.Image = Image.FromStream(img_stream)
Pic.Image = Image.FromStream(img_stream)
Pic.SizeMode = PictureBoxSizeMode.StretchImage
img_stream.Close()
End Sub