منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[سؤال] عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - نسخة قابلة للطباعة

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

الصفحات: 1 2 3


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14

شوف اخي الكريم المثال التالي قد تجد به طريقة للمطلوب
http://vb4arb.com/vb4/showthread.php?t=4442


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14

اوكي اخوي ويفضل ان تكون قاعدة البيانات Access 2013 h, 2010 لانهم الكود يتشابهون وحاول تسرع اخوي لاني تأخرت واجد مع هذا البروجكت


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14

الاصدار اللي عندي 2010 للاوفيس


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14

اخي الكريم المقصود هل قمت بحفظ الصور بالكود ام بشكل يدوي؟
ان كان بشكل يدوي فلم تفلح معه لا طريقتي ولا طريقة الاخ اللي اجاب كسلاوي.
الافضل ان تستخدم الطريقة اللي بالمثال
http://vb4arb.com/vb4/showthread.php?t=4442
فهو يحفظ بالكود ويستدعي.


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14

اخي لم اقم بوضع الصورة يدوي بل بالبرنامج هو الذي قام بوضع الصورة والمشكلة هي قراءة الصورة من القاعدة للفورم على كل اسم اختاره تظهر صورته المعنية


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 13-08-14

تم تحميل الشرح لكن اسمح لي اخبرك اني مافهمت له وحاولت اسوي مثله لكن كيف اعمل مثله وانا مو فاهم فيه شيء بس كوبي بيست ابغي احترف البرمجة هل لديك اسكايبي اتمنى انك تملك حساب في اسكايبي ليتم تدريبي عن طريق الاسكايبي


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14

طيب اخوي اكتب الكود اللي استخدمت لحفظ الصورة.


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 13-08-14

سكايبي ما ينفع اما ابحث عن معلم تقابله او معهد.


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - سعود - 14-08-14

المثال مرفق وهو بـ فيجوال بيسك 2013 التميت تحديث 3
و اكسس 2010

بالنسبة لاصدار الـ vs شوف الشرح هنا
http://vb4arb.com/vb/showthread.php?tid=757


RE: عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة - 0theghost0 - 14-08-14

تم تحميل البروجكت member pic لكن اصبح لدي خلل في الاضافة اكتشفت بأن البرنامج يقوم بحفظ الصورة داخل الاكسس ولكن لا يستطيع اظهارها في الفورم اعتقد الخلل في الاضافة هذا صورة للاضافة ولكن لا اعلم لماذا يقول لي هذا الخلل :

Dim cm As New OleDbCommand("insert into PcGame (Game_Name,Game_Release,Game_Rating,Game_Developed,Game_Published,Game_Genres,Game_Price,Game_Pic) values(@Game_Name,@Game_Release,@Game_Rating,@Game_Developed,@Game_Published,@Game_Genres,@Game_Price,@Game_Pic)", con)
cm.Parameters.AddWithValue("@Game_Name", TextBox1.Text)
cm.Parameters.AddWithValue("@Game_Release", DateTimePicker1.Value)
cm.Parameters.AddWithValue("@Game_Rating", TextBox2.Text)
cm.Parameters.AddWithValue("@Game_Developed", TextBox3.Text)
cm.Parameters.AddWithValue("@Game_Published", TextBox4.Text)
cm.Parameters.AddWithValue("@Game_Genres", TextBox5.Text)
cm.Parameters.AddWithValue("@Game_Price", TextBox6.Text)
cm.Parameters.AddWithValue("@Game_Pic", My.Computer.FileSystem.ReadAllBytes(ofd.FileName))

If con.State = ConnectionState.Closed Then
con.Open()

cm.ExecuteNonQuery()

MessageBox.Show("Add New Game", "My Systm", MessageBoxButtons.OK, MessageBoxIcon.Information)
End If

End Sub
End Class

الخلل يكون في :

cm.Parameters.AddWithValue("@Game_Pic", My.Computer.FileSystem.ReadAllBytes(ofd.FileName))

و ايضا

cm.ExecuteNonQuery()

اتمنى المساعدة وافهامي ماخلل الاضافة