Bu7mod قام بنشر سبتمبر 28, 2005 قام بنشر سبتمبر 28, 2005 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته ارجوا منكم المساعد اخواني الاعزاء هل يوجد طريقة بتقسيم الترقيم التلقائي مثلا . 1- اذا تم تحديد نوع الجنس ( ذكر ) يتم الترقيم بتسلسل ( 101 ) الخ... 2- اذا تم تحديد نوع الجنس ( انثى ) يتم الترقيم بتسلسل ( 200 ) الخ... ارجوا المساعد وذلك للأهمية تحياتي... اخوكم بومحمد الملف مرفق على هذا الرابط
rudwan قام بنشر سبتمبر 28, 2005 قام بنشر سبتمبر 28, 2005 جرب الكود التالي Private Sub sex_AfterUpdate() If Me.sex = "male" Then Me.Number = Nz(DMax("mydate", "mytable", "sex=male"), 100) + 1 End If If Me.sex = "female" Then Me.Number = Nz(DMax("mydate", "mytable", "sex=female"), 200) + 1 End If end sub مع مراعاة استبدال أسماء الحقول بأسماءها الحقيقيه في النموذج و الجدول
Bu7mod قام بنشر سبتمبر 28, 2005 الكاتب قام بنشر سبتمبر 28, 2005 اشكرك جزيل الشكر اخي العزيز rudwan على سرعة الرد تم استخدام الكود الذي وضعته بالتمام ، ولكن حصلت مشكلة بالترقيم 1- عند اختيار Male يبدا بترقيم الحقل 101 2- عند اختيار Female يبدا بترقيم الحقل 201 ولكن اذا تم اختيار Male مرة اخرى يتم ترقيم الحقل 202 وليس 102 علما بان الرقم 100 تم حديده لـ Male وليس لـ Female . تحياتي ... بومحمد
Bu7mod قام بنشر سبتمبر 28, 2005 الكاتب قام بنشر سبتمبر 28, 2005 (معدل) مكرر تم تعديل سبتمبر 28, 2005 بواسطه Bu7mod
rudwan قام بنشر سبتمبر 29, 2005 قام بنشر سبتمبر 29, 2005 أرجو أن تتأكد من صحة قيمة الحقل : male أو female ربما يكون لديك أرقام و ليس قيم مثلا 1 أو 2 راجع قيمة حقل الجنس في جدولك
Bu7mod قام بنشر سبتمبر 29, 2005 الكاتب قام بنشر سبتمبر 29, 2005 شكرا اخي rudwan حاولت في طرق عده ولكن دون جدوى الملف مرفق على هذا الرابط عند اختيار Male يعطيني ترقيم 101 - 102 - 103 الخ عند اختيار Female يعطيني ترقيم 201 - 202 - 203 الخ المشكلة هنا في حالة اختيار Male مرة اخرى يجب اكمال الترقيم 104 - 105 الخ وليس 204 - 205 الخ انشاء الله قدرة اوصل الفكرة معلش اخي رضوان اتحملني جزاك الله خير تحياتي اخوك بومحمد
wkalo قام بنشر سبتمبر 30, 2005 قام بنشر سبتمبر 30, 2005 بسم الله الرحمن الرحيم السلام عليكم ورحمة الله وبركاته،، اليك الرابطCodes.rar
wkalo قام بنشر سبتمبر 30, 2005 قام بنشر سبتمبر 30, 2005 http://www.officena.net/ib/index.php?showtopic=9704
Bu7mod قام بنشر أكتوبر 2, 2005 الكاتب قام بنشر أكتوبر 2, 2005 بسم الله الرحمن الرحيم هذا هو المطلوب سلمت يداكم واشكركم جزيل الشكر اخواني rudwan و wkalo على هذه المساعدة تحياتي اخوكم بومحمد
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.