أبا عمر

أخي الحبيب جزاك ربي خيرا ولكن لي سؤال في حال أني أريد جعل جدول CATEGORIES جدول للتسجيل المبدئي للطلاب مثلا وله نموذج خاص به للإدخال المدئي ، وجدول DELCAT بدل من جعله للمحذوفات نجعله للتسجيل النهائي وله نموذج للإدخال النهائي فمثلا لو عندي طالب جديد لكن لم يتأكد تسجيله وبعد فتره يتأكد نقوم بنقله لجدول التسجيل النهائي عن طريق الإلحاق ولا مشكلة في هذه الحالة لكن قد يكون هناك تسجيل نهائي مباشرة من نموذج الادخال النهائي ولو جعلت كل منهما ترقيم تلقائي لم يصلح فكيف ترى الحل؟

إخواني الأعزاء طلبي هو عمل ترقيم تلقائي لحقل CATID مع مراعاة عملية حذف وإلحاق السجل بجدول المحذوفات وقد حاولت عمل ذلك عن طريق الدالة DMAX لمعرفة أكبر رقم موجود في الجدول CATEGORIES ففي حدث بعد التحديث لحقل CATNAME وضعت الكود التالي If IsNull(a) Then [Textdel] = 1 Else [Textdel] = DMax("[CATID]", "CATEGORIES") + 1 End Ifحيث a حقل غير منضم لحساب أكبر رقم موجود في حقل CATID لكن المشكلة تحدث عند إلحاق السجل الى جدول DELCAT وحذفه من هذا النموذج ويالتالي من جدول CATEGORIES حيث بعد نقل السجل وإضافة سجل جديد يتكرر الرقم CATID وعند إلحاق السجل الى المحذوفات يكو ن هناك رقم مكرر في جدول DELCAT ولا أريد تكرار الرقم CATID مرفق مثال للتوضيح za-KeppDelRec_up-LAST.rar

" جزاك ربي خيرا " الخطوة الثالثة هي التي لم أكن أفهمها ثم رزقني ربي فهمها والحمد لله وأخيرا أرجو أن تتحملني ولا يضيق صدرك من أسئلتي ، وظني بك من تواصلك معي هو سعت الصدر وحبك لفعل الخير محبك_في_ الله

" حل رائع " ولقد فهمت ما قمت به جزيت خيرا مشكور أخي الحبيب والله يعجز لساني عن شكرك بما تستحقه وأعتذر على إزعاجك . فلك مني كل الشكر والتقدير محبك_في_ الله

إن شاء الله سأنتظر رد أخي الحبيب وأعتذر لك على أي إزعاج ولو صغر

جزاك ربي خير الجزاء والله يا أخي الحبيب أثلجت صدري بطرحك هذا لأني والله هذه هي الفكرة التي أسعى لتطبيقها فعليا والهدف من طرحي للمشاركة هي تطوير هذه الفكرة بحيث لا يقوم المستخدم بإدخال الباص بل يكون تلقائي أما وأن هذا صعب فطريقتي التي أحاول فيها وأرجو أن تقيمني فيها هي كما يلي : 1- قمت بعمل مربع نص غير منضم وجعلت مصدره هو الدالة DLookup لإستخراج سعة الباص الموافق لرقم الباص الذي يدخله المستخدم في مربع النص الخاص برقم الباص على النموذج 2- قمت بعمل مربع نص آخر لحساب عدد مرات إدخال كل باص يتم ادخاله وذلك عن طريق الدالة DCount 3- وبالتالي عند إختيار المستخدم لرقم الباص يظهر عندي سعة الباص وعدد مرات إدخاله ، بعدها أضع في كود في حدث بعد التحديث أو قبل التحديث " لمربع النص الخاص بإدخال رقم الباص " ليقارن بين سعة الباص المحددة سلفا في جدول الباصات وبين عدد مرات الإدخال التي تم إدخالها فيقبل إن كان هناك سعة أو يعطي رسالة تفيد " بعدم وجود مكان شاغر " وبالتالي يقوم المستخدم بإختيار باص آخر 4- ولدي إضافة أخرى وهي عمل نموذج للباصات المتاحةوعدد الأماكن الشاغرة فيها عن طريق استعلام وعند النقر المزدوج على حقل الباص يفتح النموذج ويظهر أمام المستخدم كل الباصات المتاحة ليختار منها هذا تصوري للأمر أرجو أن توجهني للصواب وجزاك ربي خيرا على تعليمي وتوجيهي وسعة صدرك معي " محبك_ في_ الله " أخي الحبيب هل هناك أي طريقة للقراءة من الجدول وأخذ رقم الباص الذي في السجل الأول ثم بعد ذلك ينتقل الى الباص الثاني الذي هو السجل الثاني وهكذا دون تدخل من المستخدم مع مراعاة شرط السعة

أين أنتم يا إخوان

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

جزاك ربي خيرا أخي الحبيب أبو خليل وجعله ربي في موازين حسناتك يوم تلقاه وهو عنك راض

للرفع

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

جزاك ربي خيرا