السلام عليكم
يا اخوان هل يوجد حل للمحافظة على تسلسل الرقم التلقائي في حين الحذف والتراجع
لاني عندي برنامج مهم وواقف عن العمل علشان هذي المشكلة
ودمت سالمين من كل شر
الترقيم التلقائي
مغلقمُجاب
اذا تم حذف سجل به رقم تلقائي ، فلا يمكن لأكسس ان يعوضه.
واذا حذفت آخر سجل فيه آخر رقم تلقائي ، اردت استعمال الرقم مرة اخرى ، فعليك استعمال زر Compact and Repair ، ثم اضف السجل الجديد ، والذي سيكون فيه الرقم الاخير الذي تم حذفه.
الرقم التلقائي لا يجب استخدامه ابداً لخانات المستخدم ، وإنما الرقم التلقائي لبرنامج الاكسس فقط ، اي انه ليس للمبرمج والمستخدم ، وانما للبرنامج،
وذلك لأن الرقم التلقائي لا يمكن استرداده في الحالات العادية عند حذفه ، بالاضافة الى ان الرقم التلقائي في بعض الحالات يقفز الى ارقام كبيرة (ولكنها متسلسلة) ، يعني انه قد يكون هكذا:
5,6,7,8,102,103,104
واذا اردت ان تكون لك خانه فيها رقم متسلسل ، فتعمل المثال الآتي:
الجدول: tbl_IN
الخانة الرقم (وليس رقم تلقائي): S
ثم تستخدم الكود التالي لزيادة الرقم في حال استحداث سجل جديد من النموذج:
me.S=dmax("","tbl_IN") +1
بهذه الطريقة ، رقمك المتسلسل S دائما سيكون صحيحا ، حتى لو حذفت السجل الاخير واضفت سجل جديد.
جعفر
الطفل وليد كتب:السلام عليكم
يا اخوان هل يوجد حل للمحافظة على تسلسل الرقم التلقائي في حين الحذف والتراجع
لاني عندي برنامج مهم وواقف عن العمل علشان هذي المشكلة
ودمت سالمين من كل شر
اخي الفاضل
هل من الممكن ابلاغنا بإسم الجدول واسم حقل الترقيم التلقائي لديك حتى نستطيع مساعدتك
بالتوفيق
اشكر الجميع على التفاعل السريع وبالأخص استاذتنا الفاضلة زهره
استاذتنا الفاضلة اسم الجدول RJ1 اسم حقل الترقيم التلقائي no
تفضل اخي الكريم
اذا كان لديك اي نماذج او اي جداول او استعلامات مفتوحه فقم بإغلاقها جميعا ثم افتح هذا النموذج فقط لا غير
الآن اضغط على زر الأمر وسوف يقوم بإعادة الترقيم التلقائي الى وضعه الصحيح في الجدول RJ1 للحقل NO
بالتوفيق
الاخت زهرة يعجز اللسان عن الشكر بما تقدمية وهذا الحل رائع ولكن استاذتي الفاضلة الا يوجد حل اسهل من ذلك كأن يكون زر امر في النموذج نفسة
او كود يوضع في حدث عند التحمل
وبالنسبة لهذا النموذج الذي وضعتية كحل لترتيب الرقم التلقائي هل استوردة لقاعدة البرنامج التي لدي ام استوردي جمع ما في القاعدة الى النموذج كي يعمل بشكل صحيح
ووفقك الله لما يحب ويرضى
الاخت زهرة يعجز السان عن الشكر بما تقدمية
وهذا الحل رائع ولكن استاذتي الفاضلة الا يوجد
حل اسهل من ذلك كأن يكون زر امر في النموذج نفسة
او كود يوضع في حدث عند التحمل
اخي الفاضل
تم التعديل ليتناسب مع وضعك الحالي
1. ستجد ماكرو بإسم AutoExec
2. ستجد وحده نمطية بإسم ModAutoNumFix
قم بإستيراد الماكرو والوحدة النمطية الى قاعدة البيانات الخاصة بك
ثم قم بإغلاق قاعدة البيانات واعد تشغيلها وسيقوم ماكرو بدء التشغيل بإستدعاء الدالة المسؤوله عن اعادة الترقيم ثم يتم فتح النماذج الخاصة بك
لهذا سيكون اعادة الترقيم عند فتح قاعدة البيانات .
بالتوفيق
أخي "الطفل وليد"
هل هناك جداول اخرى في برنامجك مرتبطة بالخانة No ؟
فاذا كان الجواب نعم ، فتغيير ارقام الخانة No (إعادة ترقيمها) سيعمل مشكلة في ربط سجلات الجدولين!!
جعفر
استاذتنا الفاضلة اشكرك من اعماق قلبي
وباقي طلب اخير اذا تكرمتي
احتاج نفس الوحدة النمطية ونفس الماكرو لترتيب للترقيم التلقائي
اسم الجدول RJ3 اسم حقل الترقيم التلقائي ID
استاذتنا الفاضلة اشكرك من اعماق قلبي
وباقي طلب اخير اذا تكرمتي
احتاج نفس الوحدة النمطية ونفس الماكرو لترتيب للترقيم التلقائي
اسم الجدول RJ3 اسم حقل الترقيم التلقائي ID
استاذتنا الفاضلة اشكرك من اعماق قلبي
وباقي طلب اخير اذا تكرمتي
احتاج نفس الوحدة النمطية ونفس الماكرو لترتيب للترقيم التلقائي
اسم الجدول RJ3 اسم حقل الترقيم التلقائي ID
تفضل اخي الكريم
اولا قم بحذف الماكرو والوحدة النمطية السابقة
ثم استورد الماكرو الجديد والوحدة النمطية الجديده من هذه القاعدة
هذه القاعدة بها ماكرو ووحده نمطية تم فيها دمج السؤال السابق بالسؤال الحالي يعني 2 في 1
بعد استيراد الماكرو والوحده النمطية قم بإغلاق القاعدة واعد تشغيلها
وسيقوم ماكرو بدء التشغيل بإعادة الترقيم التلقائي للجدول RJ1 للحقل NO والجدول RJ3 للحقل ID دفعة واحده مباشرة
بالتوفيق
هذا الموضوع مغلق.