ترقيم تلقائي

[وسيم الحمادة]

يااخوان ماهي الطريقة في نموذج اضافة سند قبض برقم تلقائي غير قابل للتكرار

بحيث اذا جيت فتحت النموذج يضع رقم جديد في سند القبض

وفي كل مرة يفتح برقم جديد

طبعا الطريقة هذه لان البرنامج لايقبل رقمين تلقائية في رقم سند القبض وفي رقم سند الصرف

هشام 1.rar

[رعد داود]

في اي  نموذج  واي  حقل  تريد ترقيم  لسند القبض ؟

[وسيم الحمادة]

في نموذج اضفة سند قبض ونموذج اضافة سند صرف والحقل هو رقم سند الصرف ورقم سند القبض 

واشكر حضورك الكريم

[رعد داود]

ضع هذا  الكود  في  زر  الإضافة
Me.الرقم الوظيفي = Nz(DMax("[الرقم_الوظيفي]", "[البيانات]"))
 
والأفضل  تغيير  اسماء الحقول  الى الانكليزية  فهذه  تسبب لك  مشاكل
الدالة  للإضافة  هي  دالة dmax

[وسيم الحمادة]

الله يجزاك خير 

وضعتها عند الضغط على اضافة سند قبض

مع اغلاف وفتح النموذج ولكن لم يظهر رقم تلقائي من 1

كما هو موضح في المرفق

اشكر حضورك

هشام 1.rar

[ابو ياسين المشولي]

DoCmd.OpenForm "اضافة_سند_صرف"
Forms!اضافة_سند_صرف![الرقم الوظيفي].Value = Nz(DMax("[رقم سند القبض]", "اضافة سند قبض") + 1, 1)

 

او بعد التحديث عند ادخال التاريخ

Me.[الرقم الوظيفي].Value = Nz(DMax("[رقم سند القبض]", "اضافة سند قبض") + 1, 1)

 

[وسيم الحمادة]

فضلت على راسنا الله يجزاك خير ويبارك فيك يارب هو ده المطلوب

[ابو ياسين المشولي]

بالتوفيق اخي بارك الله فيك

 

[رعد داود]

احسنت  اخي ابو ياسين