kha9009lid

جرب المرفق ولكن بعد مثال الاستاذ عصام لا توجد امثله تستحق ان ترفع Database281.accdb

الاساتذة برناوي وعصام جزاهم الله خير اعطوك اجابات وافية ومثال الاستاذ عصام رائع ولمن يرغب في عملها عن طريق الاستعلام SELECT * FROM msysobjects; وفي نتيجة الاستعلام يهمنا حقلين هما Name و Type ونستخدم الرموز التالية لتحديد الكائن جداول = 1 استعلام = 5 نموذج = -32768 تقرير = -32764 مايكروا = -32766 موديول = -32761 في هذة الطريقة سوف نواجه مشكلة في نتيجة الجداول حيث ستظهر اسماء جداول النظام مما يتطلب منا ان نضع معيار لاستبعاد هذه الجداول الخاصة بالنظام مثل Not Like "MSys*" اوي اي معيار مشابه

😃😃 غلطة الشاطر بعشرة

في جدول 2 تم اضافة حقل ترقيم تلقائي وعمل استعلام الحاق في النموذج جرب المرفق اذا كان هذا المطلوب Prog1.mdb

بل من الممكن ان نقول انها الشقيقة لكل من IIf . Choose وهي توأم IIF ولكن iif ترجع اختيار واحد من اختيارين واذا اردنا اكثر من اختيار نعيد كتابتها مرة اخرى في خانة عدم تحقق الشرط لنحصل على اختيارين اضافية وهكذا وبالتالي استخدام Switch افضل واسهل بخصوص مثال اخر ابشر اخي العزيز انا حاليا اعمل على مثال يحتوي على 35 دالة وطريقة استخدامها في الاكواد وفي منشئ التعبير وبشروط مختلفة لعلي انتهي منه قريبا الملف موجه للمبتدئين وليس للاخبراء امثالكم استاذي واخي الحبيب لن نستطيع ان نجاريك يا ابا جودي بل انت المعلم ومروض اكسس

اخي الحبيب @ابا جودى دالة Switch هي دالة تستخدم في العديد من لغات البرمجة ووضيفتها إختبار قيمة متغير ضمن لائحة من الإحتمالات نقوم بكتابتها و إذا تساوت هذه القيمة مع أي إحتمال ستتنفذ الأوامر التي وضعناها في هذا الإحتمال فقط واجمل مافيها انها تسمح باستخدام من الى كما في المثال اعلاه وكذلك اي عدد من الاحتمالات Switch([نص8] Between 1 And 15

جميل جدا يا @ابا جودى كما هي حلولك المبتكره دائما ولو سمحت لي ان اقدم حل اخر باستخدام منشئ التعبير وبعض دوال الاكسس لمن لا يفضل التعامل مع الاكواد واسمح لي ببعض الشرح وبعد الاذن من راعي الموضوع الاخ الفاضل @مرحبا البي اولا قمنا باضافة مربع نص غير منظم لاستخلاص عدد الايام من التاريخ المدخل ووضعنا قيمة الحقل =Day([txtDate]) ثم في حقل التاريخ الجديد وضعنا القيمة التاليه =IIf(IsNull([نص8]);"";Switch([نص8] Between 1 And 15;"01" & "/" & Format([txtDate];"mm/yyyy");[نص8] Between 16 And 31;"01" & "/" & Format([txtDate];"mm")+1 & Format([txtDate];"/yyyy"))) الملف مرفق وتقبلوا خالص مودتي وتقديري إرجاع تاريخ.accdb

من السعودية

وانا ايضا اشكرك على حسن خلقك ويسرني ان اساعدك واعمل معك

اخي العزيز @عبدالقدوس48 فهم السؤال هو الطريق الصحيح للحل في اول مشاركة في الموضوع كانت المعطيات 15000 = 0 15010 = 2 15020 = 4 وبناء عليه اقام اخي د كاف بوضع حل يتوافق مع ما اشرتم اليه اخي الحبيب ثم ذكرتم ان 15010 الى 15019 = 2 وهكذا وبناء عليه قمت بتعديل الكود الخاص باخي د.كاف وفي مشاركتك الاخيرة اجد ان الضريبة مختلفة عن المعايير ولشرائح متعددة اكثر من التي عملنا عليها مما يتطلب لايجاد حل صحيح ان توضح المعايير بدقة التفصيل مهم جدا مثلا من راتب كذا الى كذا تكون الضريبة كذا مع ذكر كافة الشرائح اعتذر عن الاطالة وتقبل من اخيك كل التقدير والمودة

العفو اخي الفاضل @عبدالقدوس48 الشكر لله سبحانه وتعالى بالنسبة للسؤال الاخير اذا كنت تقصد دالة التقريب ROUNDDOWN في اكسل فيمكن استخدام الدالة ROUND في اكسس والافضل ان تضع مثال في موضوع جديد وسوف تجد كل المساندة والعون باذن الله وتقبل اطيب تحياتي

اخي عبد القدوس هل هذا هو المطلوب ?

من 1 الى 15009 =0 من 15010 الى 15019 = 2 من 15020 فاكبر = 4 الضريبة44.accdb

عظَّم الله أجرك، وأحسن الله عزاءك، وغفر الله لميتك انا لله وانا اليه راجعون

العفو اخي العزيز بخصوص اي طلب اضافي يسعدنا التعاون معك مع الالتزام بانظمة الموقع والتي تنص على اي امر خارج نطاق الموضوع الاساسي يكون في موضوع جديد قواعد المشاركة في الموقع وتقبل مني كل الود والتقدير

جرب المرفق Vehicles Board - Copy.accdb واذا ترغب في بقاء التقرير مفتوح بعد الحفظ جرب المرفق Vehicles Board - Copy.accdb

جرب المرفق Vehicles Board - Copy.accdb

طريقة اخرى بدون الحاجة الى جدول رقم2 عن طريق منشئ التعبير ودالة Switch الضريبة2.accdb

ملف استاذنا ابو عارف اعيد رفعه لك علما بان العدد 15 وليس 10 ابوعارف.accdb

جرب اعادة التحميل الملف يعمل بشكل جيد

موفق ان شاء الله ولكن اسمح لي باستفسار لماذا وضعت قيمة cat في الامر مباشرة ماذا لو اردت الفلترة تكون من 3000 او 1500 او اي قيمة اخرى هل ستقوم كل مرة بتعديل الكود الاجراء الاسهل ان تكون عن طريق مربع نص غير منظم تضع فيه القيمة التي تريد جرب الملف المرفق zx101.accdb

من خصائص النموذج السماح بالاضافة =لا ثم وضعت امر متعدد الخيارات يسمح بالاضافة عند رغبتك او الايقاف

اعتقد انه يقصد الحقول الخاصة بسجل جديد جرب المرفق اذا كان فهمي صحيح zx10.accdb

جرب المرفق الحاق بالجدول.accdb

فعلا يستحق وبجدارة ماشاء الله علم وخلق