[نوريس]

السلام عليكم 
اريد تحميل صورة من قاعدة البيانات ( اكسس 2010) مخزنة بطريقة الباينري الى صندوق صورة ( picture box ) في فيجوال بيسك 2008 .
ارجو لمن عنده خبرة من الاخوة ان يفيدني ... عرقلة اخرتني ... حاولت اكثر من مرة .... بارك الله فيكم ...  
شكرا جزيلا 
السلام عليكم ..

[محمود بكرى]

اخى عن طريق الميمورى ستريم اولا دى دالة انا عملتها عندى عشان تجلب لى الصورة حسب جملة الاستعلام ومن خلال فتح الاتصال لدى dal.open

كود :

()Function showimage(ByVal poto As Integer) As Byte
      ()dal.open
      Dim cm As New OleDbCommand
      With cm
         Connection = dal.conn.
          CommandType = CommandType.Text.
          "CommandText = "select cplogo from settingt where id =5.
      End With
      ()Dim myphoto() As Byte = CType(cm.ExecuteScalar()), Byte
     ()dal.close
      Return myphoto
  End Function

تضع الاتصال بتاع حضرتك ده مثال عندى وجملة الاستعلام تغيرها
تستخدم الكود التالى للاظهار فى مربع الصورة

كود :

((Dim mss As New MemoryStream(showimage(5
   (PictureBox1.Image = Image.FromStream(mss

وشكر خاص للاخ ممدوح

[نوريس]

بارك الله فيه اخي محمود ... تم حل المشكلة بحمد الله ... والشكر للجميع