تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[VB.NET] كيف يتم حفظ صورة في datagridiew غير متصل بقاعدة البيانات
#1
السلام عليكم
صج فطوركم
كيف يتم حفظ صورة في datagridiew غير متصل بقاعدة البيانات
مع العلم انه توجد معلومات
مثال 
الرقم + الاسم و اللقب+وتاريخ ميلاد+ومكان ميلاد+ابن
نقوم بحفظ الصورة مع هانه المعلومات
الرد }}}
تم الشكر بواسطة: asemshahen5 , ابراهيم ايبو
#2
كود :
'  انشاء عامود للصورة بالداتا جرد فيو
       Dim dgvImageColumn As New DataGridViewImageColumn
       ' وضع الاسم بالهيدر
       dgvImageColumn.HeaderText = "Image"
       dgvImageColumn.ImageLayout = DataGridViewImageCellLayout.Stretch

       Dim dgvTextColumn As New DataGridViewTextBoxColumn
       dgvTextColumn.HeaderText = "Id"

       DataGridView1.Columns.Add(dgvTextColumn)
       DataGridView1.Columns.Add(dgvImageColumn)

       DataGridView1.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
       DataGridView1.RowTemplate.Height = 120
       DataGridView1.AllowUserToAddRows = False

وفي زر الاختيار ضع الكود التالي


كود :
 Dim opf As New OpenFileDialog
       opf.Filter = "Choose Image(*.jpg;*.png;*.gif)|*.jpg;*.png;*.gif"

       If opf.ShowDialog = DialogResult.OK Then
           PictureBox1.Image = Image.FromFile(opf.FileName)
       End If


وفي زر الاضافة


كود :
 Try
           Dim ms As New MemoryStream
           PictureBox1.Image.Save(MS, PictureBox1.Image.RawFormat)
           Dim img As Byte()
           img = ms.ToArray()
           DataGridView1.Rows.Add(TextBox1.Text, img)
       Catch ex As Exception
           MessageBox.Show(ex.Message.ToString())
       End Try
الرد }}}
تم الشكر بواسطة: asemshahen5 , ابراهيم ايبو
#3
(12-05-20, 01:45 AM)aljzazy كتب :
كود :
'  انشاء عامود للصورة بالداتا جرد فيو
       Dim dgvImageColumn As New DataGridViewImageColumn
       ' وضع الاسم بالهيدر
       dgvImageColumn.HeaderText = "Image"
       dgvImageColumn.ImageLayout = DataGridViewImageCellLayout.Stretch

       Dim dgvTextColumn As New DataGridViewTextBoxColumn
       dgvTextColumn.HeaderText = "Id"

       DataGridView1.Columns.Add(dgvTextColumn)
       DataGridView1.Columns.Add(dgvImageColumn)

       DataGridView1.AutoSizeColumnsMode = DataGridViewAutoSizeColumnsMode.Fill
       DataGridView1.RowTemplate.Height = 120
       DataGridView1.AllowUserToAddRows = False

وفي زر الاختيار ضع الكود التالي


كود :
 Dim opf As New OpenFileDialog
       opf.Filter = "Choose Image(*.jpg;*.png;*.gif)|*.jpg;*.png;*.gif"

       If opf.ShowDialog = DialogResult.OK Then
           PictureBox1.Image = Image.FromFile(opf.FileName)
       End If


وفي زر الاضافة


كود :
 Try
           Dim ms As New MemoryStream
           PictureBox1.Image.Save(MS, PictureBox1.Image.RawFormat)
           Dim img As Byte()
           img = ms.ToArray()
           DataGridView1.Rows.Add(TextBox1.Text, img)
       Catch ex As Exception
           MessageBox.Show(ex.Message.ToString())
       End Try
بارك الله فيك اخي aljzazy شكرا على تقديم المساعدة ربي يحفطك
 كيف يبم الحقاظ على البيانات المخزنة في الداتا قريد
وكيف يتم ضبط زر تصدير المعلومات الى ملف exel
وكيف يتم صبط زر الطباعة للبعض الحقول من الجدول
الرد }}}
تم الشكر بواسطة: ابراهيم ايبو
#4
كيف يبم الحقاظ على البيانات المخزنة في الداتا قريد
وكيف يتم ضبط زر تصدير المعلومات الى ملف exel
وكيف يتم صبط زر الطباعة للبعض الحقول من الجدول
الرد }}}
تم الشكر بواسطة:
#5
كيف يبم الحقاظ على البيانات المخزنة في الداتا قريد
وكيف يتم ضبط زر تصدير المعلومات الى ملف exel
وكيف يتم صبط زر الطباعة للبعض الحقول من الجدول
الرد }}}
تم الشكر بواسطة:
#6
كيف يبم الحقاظ على البيانات المخزنة في الداتا قريد
وكيف يتم ضبط زر تصدير المعلومات الى ملف exel واسترداد ملف الى داتا قريد لتعديل والاضافة فيه
وكيف يتم صبط زر الطباعة للبعض الحقول من الجدول
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  تعديل كود ارسال صورة الى الواتس new_programer 2 114 21-03-24, 10:07 PM
آخر رد: new_programer
  [سؤال] أتمنى اجابة وافية:عمل برنامج بقاعدة بيانات SQL دون حاجة تثبيت SQLSERVER dr.programming 6 600 19-03-24, 08:56 AM
آخر رد: سلامه محمد11
  [VB.NET] حل مشكلة الاتصال بقواعد البيانات access loay775 2 158 25-02-24, 06:29 AM
آخر رد: loay775
  سؤال عن عملية حذف سجل من قاعدة البيانات assuhimi 3 249 11-02-24, 08:43 PM
آخر رد: assuhimi
  [VB.NET] منع تكرار البيانات في عند الادخال مبرمج صغير 1 2 255 24-01-24, 05:18 PM
آخر رد: مبرمج صغير 1
  [VB.NET] مساعدة في استدعاء البيانات معينه من form الأول إلى form 2 بدون التعديل loay775 2 274 18-01-24, 05:04 PM
آخر رد: loay775
  [VB.NET] إعادة استدعاء البيانات من قاعدة بيانات اكسس والاهم الصورة مبرمج صغير 1 1 273 13-01-24, 01:17 PM
آخر رد: مبرمج صغير 1
  مشكلة تعليق البرنامج في حال عدم وجود ماسح ضوئي متصل بالكمبيوتر صالح عبدالله 1 210 09-01-24, 10:51 PM
آخر رد: صالح عبدالله
  [كود] اريد كود إرسال البيانات من الفيجوال بيسك إلىPDF issamsaidd 10 5,829 25-12-23, 06:30 PM
آخر رد: الحزين اليماني
  جملة الاتصال بقاعدة البيانات اكسس محمد خيري 4 364 12-12-23, 03:14 AM
آخر رد: محمد خيري

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم