إضافة صورة في قاعدة بيانات أكسيس
صفحة 1 من اصل 1 • شاطر
إضافة صورة في قاعدة بيانات أكسيس
إضافة صورة في قاعدة بيانات نوع أكسيس
أولا لابد ان يكون لديك حقل من نوع كائن OLE يكون اسمه مثلا photo
يجب ان يكون لديك على الفورم الاداة PictureBox ثم في زر الاضافة في الفيجوال بيسك نت تكتب الكود التالي
أولا لابد ان يكون لديك حقل من نوع كائن OLE يكون اسمه مثلا photo
يجب ان يكون لديك على الفورم الاداة PictureBox ثم في زر الاضافة في الفيجوال بيسك نت تكتب الكود التالي
- الكود:
Public DBCon As New OleDb.OleDbConnection
DBCon.ConnectionString = "provider=microsoft.jet.oledb.4.0;data source=" + Application.StartupPath + "\DATABASE.mdb"
Try
DBCon.Open()
Catch ex As Exception
MessageBox.Show(ex.Message, "لم يتم الربط مع قاعدة البيانات", MessageBoxButtons.OK, MessageBoxIcon.Error, MessageBoxDefaultButton.Button1, MessageBoxOptions.RightAlign)
DBCon.Close()
End
End Try
Dim cmd As OleDbCommand = Nothing
Dim SQL_Insert As String = "insert into student(Photo) VALUES (@image)"
cmd = New OleDbCommand(SQL_Insert)
cmd.Connection = DBCon
Dim ms As New MemoryStream()
Dim bmpImage As New Bitmap(PictureBox1.Image)
bmpImage.Save(MS, System.Drawing.Imaging.ImageFormat.Jpeg)
Dim data As Byte() = MS.GetBuffer()
Dim p As New OleDbParameter("@d1", OleDbType.VarBinary)
p.Value = data
cmd.Parameters.Add(p)
cmd.ExecuteNonQuery()
المبرمج الطموح- الاشراف
- تاريخ التسجيل : 18/02/2011
المساهمات : 207
النقاط : 368
التقيم : 17
الدولة :
الجنس :
| |
صفحة 1 من اصل 1
صلاحيات هذا المنتدى:
لاتستطيع الرد على المواضيع في هذا المنتدى
» تصميم تطبيق جوال لمغسلة ملابس
» تصميم تطبيق جوال لشركة عقارات
» شركة مكافحة النمل الابيض بالرياض
» تصميم تطبيق جوال لنقل الاثاث
» هناجر
» تصميم تطبيق جوال لمتجر ورد
» تصميم تطبيق جوال لسلسلة مطاعم
» تصميم تطبيق جوال لتوصيل الطلبات
» مظلات سيارات متحركة