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

بارك الله فيك يا أخي .

فعلاً هذا السؤال لم أجد له إجابة .. كل ما وجدت هو أكواد لها بداية وليس لها نهاية مملة ومتعبة عند تطبيقها .

أما الترقيم في التقرير فهو سلس وسهل جداً .

فياليت خبراء الأكسس والبارعين فيه يجدون لنا طريقة لترقيم الاستعلام والنموذج أو أحدهما وتكون الطريقة بسيطة جداً .

وللجميع تحياتي(f) (f)

الموضوع طرح كثيرا سابقا وطرح له أكثر من حل بالكود

و لكن أعتقد أن لكل مقام مقال

فبتحديد الحالة المطلوب ترقيمها يمكن مناقشة الموضوع بتحديد أكثر

فكثير من الحالات يفي فيها احد الحلين الآتيين بالغرض

1 - الترقيم التلقائي

2- استخدام الدالة dmax لاضافة 1 الي آخر رقم

Forms![Formname]![TextBoxname] = DMax("FieldName", "TableName") + 1

و من الممكن تطبيق

Me![TextBoxname] = DMax("FieldName", "TableName") + 1
or
Me.TextBoxname = DMax("FieldName", "TableName") + 1

لو كانت الأمر ينفذ من نفس الفورم

عفوا .......

كنت اريد طريقة بدون كود !!!

ثم ان الكود المطروح غير مفهوم يا ريت لو تشرحه

فماذا تقصد بكل كلمة منها ....

Forms![Formname]![TextBoxname] = DMax("FieldName", "TableName") + 1

الله الله يا أخ : رامي

دائماً تعبر عما أريده وقد ذكرت ذلك من قبل

يجب توضيح معنى الأكواد قد الإمكان يعني ماذا يعني هذا

Formnam : اسم النموذج .

TextBoxname : اسم مربع النص في النموذج .

FieldName : هذا لا أعرف معناها .

TableName : هذا لا أعرف معناها .

وأين يوضع هذا الكود في مصدر البيانات لمربع النص أم في أحد الأحداث الخاصة بالنموذج

Forms![Formname]![TextBoxname] = DMax("FieldName", "TableName") + 1

وللجميع تحياتي

يا شباب صعب جداً شرح كل كود يالله إن الواحد يجد فرصة لوضع حل للسؤال 0

عموماً بعد إذن الأخ/محمد

الشرح:

1. كلمة Forms تستخدم للإشارة إلى مجموعة النماذج في أكسيس فعندما تكتب كلمة Forms يعرف فيجول بيزك أن الكائن الذي سوف تنفذ عليه الأمر هو نموذج0

2.FormName هو اسم النموذج الذي تريد أن تتعامل الأحداث والأوامر التي تكتبها معه0

3. و TextBoxname اسم مربع النص الموجود في النموذج الذي يحتوي على القيمة المراد معالجتها بالكود0

وهنا ملاحظة أود إيضاحها في أغلب الأحيان وعندما نشير إلى قيمة في مربع نص في نموذج لا بد أن نتدرج فنشير أولاً إلى مجموع الكائنات مثلاً نماذج أو تقارير ثم نتبعها باسم الكائن ثم اسم العنصر0

4. DMax دالة تأخذ أعلى قيمة المخزنة في حقل في جدول ما وتستخدم مع الأرقام والتواريخ ويصعب عليها معرفة الأكبر في النصوص0

5. FieldName تعني اسم الحقل الذي يحتوي على القيمة في الجدول مثل حقل الراتب أو الرقم المسلسل أو أي قية أخرى

6. TableName هو اسم الجدول

المعنى العام للكود الموضح في رد الأخ/ محمد معناه0

يا دالة Dmax خذي أعلى قيمة موجودة في حقل الرقم المسلسل الموجود في جدول " كذا وضعي هذه القيمة في مربع النص الذي اسمه كذا في نموذج كذا وزيدي على تلك القيمة واحد0 في كل مرة ينفذ الكود0

مكان استخدام الكود : يمكن وضع الكود في حدث في الحالي للنموذج أو عند الإنتقال إلى سجل جديد أو بعد إدخال قيمة في احد الحقول0

هذا شرح سطر واحد من الأكواد فما بالكم لو كان الكود فوق عشرين سطراً ولذلك الجميع يتحاشى شرح الأكواد لأن ذلك يحتاج إلى وقت ولكن حاولوا استنتاج معاني الأكواد من عملها0

أرجو أن أكون قد وفقت وأن كان هناك خطأ فأرجو أن تعذروني لآنني كنت على عجل ولكن أريد أن أطيب خطركم ولا تزعلون علينا أو تتهموننا بالتطنيش كما في بعض الأسئلة من بعض الأخوة فلكل شيء سبب لكم خالص تحياتي

انتهز الفرصة لاتقدم بجزيل الشكر للاستاذ مصلح على هذا المجهود

وكان المطلوب عدم شرح الكود كلمة كلمة .. ولكن المطلوب

أولاً : المسميات الانجليزية الخاصة بالحقول والجداول والنماذج لو تتحول إلى عربية في أثناء وضعه هنا

ثانياً : مكان وضع الكود في أي حدث

فقط هذا هو المطلوب حتى نتمكن من تطبيق الكود وليس النظر إليه فقط

وللجميع تحياتي

انتهز الفرصة لاتقدم بجزيل الشكر للاستاذ مصلح على هذا المجهود

وكان المطلوب عدم شرح الكود كلمة كلمة .. ولكن المطلوب

أولاً : المسميات الانجليزية الخاصة بالحقول والجداول والنماذج لو تتحول إلى عربية في أثناء وضعه هنا

ثانياً : مكان وضع الكود في أي حدث

فقط هذا هو المطلوب حتى نتمكن من تطبيق الكود وليس النظر إليه فقط

وللجميع تحياتي

اريد طريقة لعمل تسلسل في استعلام او نموذج وياريت تكون سهلة وبسيطة بدون طريقة الكود مثل عملية الترقيم في تقرير ..

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

(نوع البيانات) ترقيم تلقائي

يتم إضافة هذا الحقل للنموذج وللتقرير إن أردت فيكون فعال جدا

أرجو أن أكون قد فهمت القصد والله يحفظكم جميعاً .

عفوا يا سيد انور

الترقيم يتغير في كل مرة اطلب بها استعلام جديد ويبدا من 1