[EYADISMAIL]

السلام عليكم .. 

واجهتني بعض الاخطاء الصغيرة وهي

كود :

imgstr = ImageToString(PictureBox1.Image)

----------------------------------------------------------------------------------------------------------------------------------

---

وجدت ما الخطا هنا لقد قمت بوضع كود (Function) الذي في الاسفل في كلاس جديد (Class1) وعند نقل هذا الفنكشن الي نفس الفورم وهو فورم 1 اختفت المشكلة...^^! 

كود :

'كود تحويل الصورة إلى سلسلة نصية base64 والعكس :

   Private Function ImageToString(img As Image) As String
       Dim m As New MemoryStream()
       img.Save(m, System.Drawing.Imaging.ImageFormat.Jpeg)
       Return Convert.ToBase64String(m.ToArray())
   End Function

   Private Function StringToImage(imgstring As String) As Image
       Dim imgbytes As Byte() = Convert.FromBase64String(imgstring)
       Dim m As New MemoryStream(imgbytes)
       Return Image.FromStream(m)
   End Function

---------------------------------------------------------------------------------------------------------------
تبقى هذه المشكلة الصغيرة 

كود :

imgstr = ImageToString(PictureBox1.Image)

           nod.ChildNodes(2).InnerText = imgstr