ارفقت اسفله نسخة من مشروع دفتر تنقيط مدرسي
وفيه خطأ في النتقل بين السجلات لم أعرف مصدره
مشروعي هذا طبقت فيه حرفيا ما ذكرته في درسك فك الخلط الحاصل بين الوضعين المتصل و المنفصل
لكن بالنسبة للتنقل بين السجلات بقيت هناك ثغرة لم استطع تنفيذها
اتمنى ان تحتملني فانا مازلت مبتدئا
جزاك الله خيرا
حتى لا اتعبك كثيرا
هل لك ان بشي من التفصيل في هذا الجزء من الكود
' فتح قناة الاتصال
MyConnection.Open()
' الحصول على مرجع التسجيل المراد الوصول إليه
Dim query As String = ""
Select Case RecPos
Case RecordPosition.First ' استعلام مرجع أول تسجيل أي أصغر تسجيل
query = "SELECT MIN(ID) FROM UserInfo"
Case RecordPosition.Last ' استعلام مرجع آخر تسجيل أي أكبر معرف
query = "SELECT MAX(ID) FROM UserInfo"
Case RecordPosition.Next ' استعلام مرجع التسجيل اللاحق أي أصغر معرف أكبر من المعرف الحالي
query = "SELECT MIN(ID) FROM UserInfo WHERE ID > @CurID"
Case RecordPosition.Previous ' استعلام مرجع التسجيل السابق أي أكبر معرف أصغر من المعرف الحالي
query = "SELECT MAX(ID) FROM UserInfo WHERE ID < @CurID"
Case RecordPosition.This ' فقط لإعادة معرف التسجيل الحالي
query = "SELECT @CurID"
End Select
' إنشاء و تهيئة كائن أمر سكل
Dim cmd As New OleDbCommand(query, MyConnection)
' زيادة البرمتر الذي يحدد مرجع التسجيل الحالي
cmd.Parameters.Add("@CurID", OleDbType.BigInt).Value = CurID
' تنفيذ أمر إرجاع مرجع التسجيل التالي
Dim o As Object = cmd.ExecuteScalar()
تم تعديل هذه المشاركة بواسطة aboumazen في 15 فبراير 2010 في 19:58
أظن أنك ركزت في مشروعك على هذا الجزء :
/index.php?showtopic=208690&view=findpost&p=1035927
الكود الذي قرأت في دالة الحدث Load للنموذج الأول في المشروع الذي أرفقت هو كود الدالة GoToRecord في الجزء المشار إليه في الرابط أعلاه و أنت وضعته داخل دالة الحدث Load للنموذج. المرجو إعادة كتابة الكود داخل دالة مماثلة للدالة GoToRecord حتى تستطيع المناداة عليها من داخل دوال الحدث Click لأزرار التنقل بين التسجيلات.
ملاحظة : أعجبني تصميم واجهة المستخدم ;)
بالتوفيق :)
جزاك الله خيرا
سعدت لانه اعجبتك الواجهة
ماذا تقصد بدالة شبيهة ب GetToRecord ؟
هل انشئ دالة جديدة ام ماذا ؟
اقتباسماذا تقصد بدالة شبيهة ب GetToRecord ؟هل انشئ دالة جديدة ام ماذا ؟
قصدي ببساطة أنك لست مجبرا على التقيد حرفيا بالدرس...
في الحقيقة لم اعرف كيف افعلها
قرأت موضوعك عدة مرات ولم اتوصل الى نتيجة
منذ صلاة الصبح وانا أبحث عن حل لهذه المشكلة الى الان لم اتمكن
هل لي ببعض الدقائق من وقتك و تساعدني في كتابة كود التنقل هذا
جزاك لله خيرا
الأخ الكريم/الأخت الكريمة
السلام عليكم ورحمة الله وبركاته
مرحباً بكم في منتدى الفريق العربي للبرمجة
تأسف إدارة المنتدى لغلق الموضوع وذلك لمخالفته قوانين المشاركات .
قواعد طرح المشاركات
شاكرين لكم حُسن تعاونكم
هذا الموضوع مغلق.