[VB.NET] طلب عاجل الله يرضى عنكم - نسخة قابلة للطباعة +- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb) +-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40) +--- قسم : قسم أسئلة قواعد البيانات تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=41) +--- الموضوع : [VB.NET] طلب عاجل الله يرضى عنكم (/showthread.php?tid=1384) |
طلب عاجل الله يرضى عنكم - essabar - 30-12-13 السلام عليكم ورحمة الله تعالى و بركاتة , إخواني هدا أول طلب لي بالمنتدى , أنا مقيم بفرنسا ومبتدئ بالبرمجة ,والأن أعكف على إنشاء مشروع لمدرسة لتحفيظ القرأن وواجهتني مشكلة صغيرة تكمن في table التلميد وبالخصوص في صورة التلميد ’, بحيت أنجح في رفع صورة التلميد وأعمل لها save لكن عندما أريد عرضها في picbox يظهر الرابط في textbox ولا تضهر الصورة في picbox وللمزيد من المعلومات المرجو الإستفسار دون تردد شكرا الكو الدي استعملته . كود ارفع الصورة Private Sub btnLoadPic_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnLoadPic.Click Dim OFD As New OpenFileDialog With OFD .Filter = "AllFiles|*.*|BitMap|*.bmp|JPG|*.jpg" .InitialDirectory = My.Computer.FileSystem.SpecialDirectories.MyPictures .Title = "جلب صورة الموظف" .ShowDialog() End With TextBox6.Text = OFD.FileName PicBox1.Image = Image.FromFile(OFD. كود اعرض الصورة وكدا المعلزمات الأخرى conn.Open() Dim dataadapter1 As New OleDbDataAdapter(sql, conn) dataadapter1.Fill(dataset1, "enfant") TextBox1.DataBindings.Add("text", dataset1, "enfant.num") TextBox2.DataBindings.Add("text", dataset1, "enfant.nom") TextBox3.DataBindings.Add("text", dataset1, "enfant.prenom") TextBox4.DataBindings.Add("text", dataset1, "enfant.datedenaissance") ' Me.dtp.Text = Today.ToString TextBox5.DataBindings.Add("text", dataset1, "enfant.classep") TextBox6.DataBindings.Add("text", dataset1, "enfant.classeamcf") TextBox7.DataBindings.Add("text", dataset1, "enfant.photo") conn.Close() عفوا هاهي صورة form التلميد شكرا |