السلام عليكم ورحمة الله وبركاته وبعد
كانت حاب اشيد بجهود الاعضاء القائمين على الموقع
عندي سؤال هو....
كيف يمكن إضافة صورة موجودة في DataGridView إلى القاعدة البيانات علماَ بان في بعض الاوقات لايوجد مسار يوضح موقع الصورة وذلك بسبب تحميل الصور من قاعدة البيانات وهذا هو الكود المستخدم لدي
استدعاع الصور من قاعدة البيانات
Dim imageData() As Byte
Dim memoryStream As System.IO.MemoryStream
SQL = "SELECT Document_Image FROM File_Document “
cmSQL = New Data.SqlClient.SqlCommand(SQL, Connection)
DrSQL = cmSQL.ExecuteReader()
Me.DataGridView.RowCount = 0
Do While DrSQL.Read
imageData = CType(DrSQL.Item("Document_Image"), Byte())
memoryStream = New IO.MemoryStream(imageData)
Me.DataGridView.Rows.Add(Me.DataGridView.RowCount + 1, New Bitmap(memoryStream))
memoryStream.Close()
Loop
-------------------------------------------------------------------------------------------------------------------------------
هذا الكود الحفظ السابق الذي لدي تقريباً
Dim cn As New SqlConnection(strCn)
Dim cmd As New SqlCommand("INSERT INTO File_Document (Document_Image ) " & _
"VALUES (@Document_Image )", cn)
Dim strBLOBFilePath As String = _
"C:\Documents and Settings\All Users\Documents" & _
"\My Pictures\Sample Pictures\winter.jpg"
Dim fsBLOBFile As New FileStream(strBLOBFilePath, _
FileMode.Open, FileAccess.Read)
Dim bytBLOBData(fsBLOBFile.Length() - 1) As Byte
fsBLOBFile.Read(bytBLOBData, 0, bytBLOBData.Length)
fsBLOBFile.Close()
Dim prm As New SqlParameter("@BLOBData", SqlDbType.VarBinary, _
bytBLOBData.Length, ParameterDirection.Input, False, _
0, 0, Nothing, DataRowVersion.Current, bytBLOBData)
cmd.Parameters.Add(prm)
cn.Open()
cmd.ExecuteNonQuery()
cn.Close()
------------------------------------------------------------------------------------------------------------------------------------------------