منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [VB.NET] الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net (/showthread.php?tid=16986)

الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - superawdi - 25-08-16

السلام عليكم ورحمة الله وبركاتة

اخواني اخوكم واقع في مشكلة ..


عندي قاعدة بيانات ميكروسوفت SQL ، وصنعت جدول فية عمود لحفظ الصور من نوع Image . المهم.

عملية ادخال الصور Insert شي سهل بالفجول بيسك نت ((أنا استخدم نسخة 2013 من الفجول ستوديو)) استخدمت ال Filestream و Binary Reader
كود :
(Dim FS As New FileStream(Img_loc, FileMode.Open, FileAccess.Read
          (Dim BR As New BinaryReader(FS
               ()img = BR.ReadByte


نجي للمشكلة
|
|
Heart

الان انا مسوي دالة مسميها FillBox وعملها انو اول ما اعمل Select  لل Datagridview
يعبي البيانات للحقول ..
الموضوع سهل وبسيط

كود :
Dim dt As DataTable = New DAL().Select_Adapter("ٍSelect command")

If dt.Rows.Count = 0 Then Exit Sub

lblID.Text = dt(0)(0).ToString()
txtCatName.Text = dt(0)(1).ToString()
txtCatNote.Text = dt(0)(2).ToString()
ألى هنا كل شي مضبوط 



ولنفرض ان (dt(0)(2)) عبارة عن الحقل الموجود فيه الصورة في الـDataTable

اريد اعمل لها Load او اضهرها في Picturebox1

انا استخدمت عدة طرق ... لدرجة لن تتصوروها ..

المهم بحثت بكل اللغات .. والكل يجاوب نفس الشي

كالتالي

كود :
Dim ms As New MemoryStream(CType(dt(0)(3), Byte()))
PictureBox1.Image = Image.FromStream(ms)
او

كود :
Dim imgByte As Byte()
imgByte = directcast(dt(0)(3),byte())
PictureBox1.Image = Image.FromStream(New MemoryStream(imgByte))

والكثير الكثير .. غيرت من Datatable الى Dataset ونفس المشكلة
واستخدمت طريقة الـ Bitmap

المهم

تكفون افيدونا وساعدوني ..


شكراً ..


RE: الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - superawdi - 07-09-16

ولا رد ؟؟غريبة

RE: الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - أبو عمر - 07-09-16

http://www.dhirajranka.com/2011/05/image-to-database-and-from-database-to-picturebox-control-c/

RE: الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - سعود - 07-09-16

لاتجعل عمود الصورة من نوع image بل من نوع binary واحفظ بطريقتك هذه.
شوف مثالي هنا

RE: الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - Kian Tech - 07-09-16

اولا نوع البيانات يجب ان يكون binary 

لاسترجاع الصورة

PHP كود :
Dim dtp As New SqlDataAdapter("select * from Info where id ='1'", Sqlconn)
            Dim ds As New DataSet
            dtp.Fill(ds, "Info")
    
                PictureBox1.DataBindings.Clear()
                PictureBox1.DataBindings.Add("image", ds.Tables("Info"), "img", True)
           
              
           


RE: الرجاء المساعدة .. استرجاع صورة من قاعدة بيانات ميكروسوفت SQL بـ الـ VB.Net - superawdi - 20-09-16

مشكورين جماعة