يمكن عمل ترقيم تلقائي للنموذج form في برنامج الاكسيس Ms access وذلك باستخدام الدالة Dmax ويمكن شرح ذلك عن طريق المثال الأتي:-
لدينا جدول اسمه cmembers وبه حقل cid أو رقم العضو ونوع هذا الحقل هو Number ونريد ان يتم عمل ترقيم تلقائي لهذا الحقل من خلال النموذج form في الاكسيس Ms access
ثم نقوم بإنشاء نموذج مبنى على هذا الجدول كما هو موضح شكل النموذج في وضع
التصميم Design view
ومن خصائص النموذج نقوم بفتح التبويب Data ومنه نختر enabled No وذلك حتى لا
يتمكن أي شخص من التعديل على قيم رقم العضو حيث سيتم إنشاء رقم العضو تلقائيا
من خلال الدالة Dmax
ونضغط على حقل رقم العضو cid ومن خلال خصائص الحقل من التبويب Data ومن خاصية
القيمة الافتراضية Default value نكتب الدالة dmax
ونكتب الدالة كما هو موضح بالشكل حيث نكتب dmax ثم اسم الحقل الذي
نريد أكبر قيمة به وهو حقل cid حقل رقم العضو وهذا الحقل موجود في جدول
cmembers ثم نغلق القوس ونضيف واحد عليه +1
ونلاحظ أن الحقل الأول في النموذج تكون قيمته Null مما يجعلنا نستخدم دالة
Nz مع الدالة Dmax حيث أن وظيفة الدالة Nz تقوم بإرجاع قيمة صفرية في حالة
وجود القيمة Null للحقل ومعنى الدالة Nz الأن أنه إذا وجدت قيمة الحقل
تساوى Null اجعل قيمته 1 وغير ذلك هات اكبر قيمة للحقل واجمع عليها رقم 1 مما
يجعل الترقيم التلقائي في النموذج يسير بشكل تلقائي
نلاحظ أنه تم عمل ترقيم تلقائي للنموذج كما هو موضح بالشكل، وكلما ضعت على زر
التالي لإنشاء سجل جديد يتم زيادة الترقيم التقائي
المشاركات
ليست هناك تعليقات:
إرسال تعليق