أخواني الاعزاء
عندي سؤال هو :
قمت بتصميم قاعدة بسيطة وقمت بعمل فورم لها وتم ربطه مع قاعدة البيانات وقمت برط عناصر ادخال المعطيات ( صندوق النص) مع قاعدة البيانات وقمت بوضع ثلاث ازرار حفظ – السابق – التالي ولكن المشكلة هي انه عندما اقوم بضغط علي الزر السابق مثلا
حتي ياتي الي اول سجل تظهر رسالة خطاء واريد عندما اذهب الي اول سجل واقوم بضغط الزر تظهر رسالة ( هذه أول سجل )
وبالمثل مع زر التالي فما هو الكود ياأهل الاكواد البرمجية $$$$$$ وجزاكم الله خيرا
اهلا اخوي العزيز
جرب هذا الكود
If Not Me.Data1.Recordset.EOF Then Me.Data1.Recordset.MoveNext Exit Sub End If Me.Data1.Recordset.MovePrevious MsgBox "هذا هو السجل الاخير", vbInformation, "الفريق العربي للبرمجة"
اذا كنت تستخدم Adodc غير اسم الاداة في المثال الى Adodc1
يقوم هذا الكود بفحص السجل الحالي فاذا كان هو الاخير او نهاية الملف يتجاوز عملية الانتقال الى السجل التالي .
لزر السابق استعمل نفس الكود مع تبديل Eof ألى Bof
تحياتي اخي العزيز
هذا الموضوع مغلق.