تحديد عدد السجلات واظهارها

عندما تربط Access مع SQL Server او MSDE تظهر اضافة الى الازرار العادية الخاصة بالحركة بين البيانات ، تظهر ازارا تسمح لك بالتحكم بعدد السجلات التي يجب اظهارها عند فتح الجدول او النموذج.

بالنسبة لاكسس العادي يمكنك القيام بذلك عن طريق الامر TOP = 10 وذلك بوضع هذا الامر في كود الاستعلام ، وهو يخبره اعطيني اول عشرة نتائج من الاستعلام.

ومن ثم يمكنك ربط النموذج بالاستعلام.

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

لذلك يجب عليك استخدام كود الفيجوال بيزك بداخل النموذج للقيام بذلك

حيث عند فتح النموذج يجب ان يفحص هل هناك سجلات في الجدول وان لم يوجد يقوم بانشاء 10 سجلات

طريقة الفحص سهلة ففي حال بان المؤشر الى الجدول اسمه rs فالفحص

if not rs.eof and not rs.bof then

هناك سجلات اذن لا تفعل شيء

else

لا يوجد هنام سجلات اذن ابني عشرة بالامر

rs.AddNew

rs.Update

عشرة مرات ويمكن استخدام for i لذلك

end if

الخطوة الثانية هي الغاء امكانية الاضافة من خصائص النموذج ، والغاء عملية الحذف ، وابقاء عملية التعديل ، وتلك الخصائص موجودة في كل نموذج في اول قائمة الخصائص

الامر بسيط اليس كذلك :)