خطأ في إعادة الترقيم من الصفر

[نرجس الورد]

السلام عليكم ورحمة الله وبركاته

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

ظهرت لي الرسالة التالية :

والملف تم تحميله من موضوع الاخ جمال فايز

http://www.officena.net/ib/index.php?showt...p;hl=AutoNumber

ReAutoNumber.rar

[Dream_Works]

أختي الكريمة

الملف شغال عندي و بدون مشاكل ... و لكن الكود المكتوب به معقد قليلاً .. يمكنك تجربة الملف الذي يعمل ترقيم تلقائي بالاستعلام( دون الحاجة إلى حقل خاص للترقيم في الجدول ) على الرابط التالي

رابط الترقيم التلقائي بالاستعلام

يمكنك الاستفادة من هذا الملف .... و إن لم تستطيعي أرجو أن إبلاغي بما تريدين بالضبط

بالتوفيق

[نرجس الورد]

أختي الكريمة

الملف شغال عندي و بدون مشاكل ... و لكن الكود المكتوب به معقد قليلاً .. يمكنك تجربة الملف الذي يعمل ترقيم تلقائي بالاستعلام( دون الحاجة إلى حقل خاص للترقيم في الجدول ) على الرابط التالي

رابط الترقيم التلقائي بالاستعلام

يمكنك الاستفادة من هذا الملف .... و إن لم تستطيعي أرجو أن إبلاغي بما تريدين بالضبط

بالتوفيق

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

وبالنسبة لطريقة الترقيم عن طريق الاستعلام فلا اشكال فيها ولكني الآن أحتاج لترقيم تلقائي من نفس الجدول

جرب طبق المثال في ملف آخر وتأكد هل يعمل معك !!

[Dream_Works]

أختي الكريمة

المشكلة تكمن في وجود متغيرات في الكود غير معرفه تلقائيا لكل ملف أكسيس و هي

ADOX

و لذلك يجب تعريف مكتبة المتغيرات (Library) الخاصه بها يدوياً

و ذلك يتم عن طريق الآتي

1- فتح شاشة الكود للملف الجديد

2- تشغيل الأمر التالي من القوائم

Tools -> References

3- البحث عن المكتبة التالية ووضع علامة صح عندها

"Microsoft ADO Ext. 2.8 for DLL and Security"

بالتوفيق ...