|
[سؤال] عضو جديد وحاب اتواصل معاكم في قسم البرمجة بس اتمنى المساعدة
|
13-08-14, 04:28 PM
شوف اخي الكريم المثال التالي قد تجد به طريقة للمطلوب
http://vb4arb.com/vb4/showthread.php?t=4442 اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
 
13-08-14, 04:41 PM
اوكي اخوي ويفضل ان تكون قاعدة البيانات Access 2013 h, 2010 لانهم الكود يتشابهون وحاول تسرع اخوي لاني تأخرت واجد مع هذا البروجكت
13-08-14, 04:45 PM
الاصدار اللي عندي 2010 للاوفيس
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
13-08-14, 05:35 PM
اخي الكريم المقصود هل قمت بحفظ الصور بالكود ام بشكل يدوي؟
ان كان بشكل يدوي فلم تفلح معه لا طريقتي ولا طريقة الاخ اللي اجاب كسلاوي. الافضل ان تستخدم الطريقة اللي بالمثال http://vb4arb.com/vb4/showthread.php?t=4442 فهو يحفظ بالكود ويستدعي. اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
13-08-14, 08:54 PM
اخي لم اقم بوضع الصورة يدوي بل بالبرنامج هو الذي قام بوضع الصورة والمشكلة هي قراءة الصورة من القاعدة للفورم على كل اسم اختاره تظهر صورته المعنية
13-08-14, 09:28 PM
تم تحميل الشرح لكن اسمح لي اخبرك اني مافهمت له وحاولت اسوي مثله لكن كيف اعمل مثله وانا مو فاهم فيه شيء بس كوبي بيست ابغي احترف البرمجة هل لديك اسكايبي اتمنى انك تملك حساب في اسكايبي ليتم تدريبي عن طريق الاسكايبي
13-08-14, 10:19 PM
طيب اخوي اكتب الكود اللي استخدمت لحفظ الصورة.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
13-08-14, 10:24 PM
سكايبي ما ينفع اما ابحث عن معلم تقابله او معهد.
اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
14-08-14, 02:22 AM
المثال مرفق وهو بـ فيجوال بيسك 2013 التميت تحديث 3
و اكسس 2010 بالنسبة لاصدار الـ vs شوف الشرح هنا http://vb4arb.com/vb/showthread.php?tid=757 اللهم إني أعوذ بك من غلبة الدين وغلبة العدو، اللهم إني أعوذ بك من جهد البلاء ومن درك الشقاء ومن سوء القضاء ومن شماتة الأعداء
اللهم اغفر لي خطيئتي وجهلي، وإسرافي في أمري وما أنت أعلم به مني، اللهم اغفر لي ما قدمت وما أخرت، وما أسررت وما أعلنت وما أنت أعلم به مني، أنت المقدم وأنت المؤخر وأنت على كل شيء قدير
14-08-14, 02:24 PM
تم تحميل البروجكت 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() اتمنى المساعدة وافهامي ماخلل الاضافة |
|
|
