[محمد اسماعيل]

(02-10-18, 07:57 PM)rnmr كتب : جرب هذا

كود :

If Me.PictureBox1.Image Is Nothing Then
   UPDATE_COM.Parameters.AddWithValue("@WEBSERVERPAYED_IMAG", DBNull.Value)
Else
   Dim ms As New MemoryStream
   PictureBox1.Image.Save(ms, PictureBox1.Image.RawFormat)
   Dim img() As Byte = ms.ToArray()
   UPDATE_COM.Parameters.AddWithValue("@WEBSERVERPAYED_IMAG", img)
End If

(02-10-18, 08:22 PM)عبدالله الدوسري كتب : في الجدول بقاعدة البيانات إجعل حقل الصورة يقبل ( Null ) 
وفي البرنامج , لا تمرر أي شيء يخص الصورة إذا كانت خالية , لست مطالب بتمرير ( Parameter ) يعبر عن قيمة الصورة , إذا كانت في الجدول بقاعدة البيانات تقبل ( Null )

جزاكم الله خيرا عني وعن غيري