moho58 قام بنشر الثلاثاء at 19:43 قام بنشر الثلاثاء at 19:43 السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل هذا الموضوع تعديل طفيف لموضوعي السابق كنت قد طرحته في هذا المنتدى الكود السابق الجميل للأخ الأستاذ @ Foksh يؤدي المطلوب على اكمل وجه أردت فقط تغيير الفكرة وجعل نموذج واحد يحتوي على 3 أنواع بعدما كان نوع واحد فقط في نموذج (لأن الأنواع الثلاثة لها نفس معايير التقييم لذا أردت ان اجعله في نموذج) النوع الأول: المهندسين النوع الثاني : المعليمن النوع الثالث: الأساتذة أريد تغيير الكود السابق (الموجود الوحدة النمطية ) بشرط يؤدي المطلوب كما في السابق : في السابق كان كالتالي: If typ = "مهندسين" Then والآن اريد التعديل =if typ "مهندسين " أو "معلمين " أو "أساتذة" وجزاكــــــــم الله كل الخير رابط الموضوع السابق: ـ BASE-E5.accdb
Foksh قام بنشر الأربعاء at 00:08 قام بنشر الأربعاء at 00:08 مشاركة الأستاذ @AbuuAhmed ، جميلة وتؤدي الغرض بكفاءة باستعمال Case بدلاً من الجملة الشرطية If .. ومشاركة معه ضمن نفس الاسلوب باستعمال If If typ = "مهندسين" Then rs!evalu_moubadara_chaksia = 4.5 rs!evalu_itkan_elamel = 4.5 rs!evalu_nachatat_tarbia = 4.5 rs!evalu_absence = 8 rs!evalu_retard = 4 rs!evalu_tatwir = 4.5 ElseIf typ = "أساتذة" Then 'عدل القيم اسفلها حسب رغبتك rs!evalu_moubadara_chaksia = 4.5 rs!evalu_itkan_elamel = 4.5 rs!evalu_nachatat_tarbia = 3 rs!evalu_absence = 8 rs!evalu_retard = 4 rs!evalu_tatwir = 4.5 rs!evalu_absence_prof = 12 rs!evalu_retard_prof = 4 rs!evalu_nadawat_prof = 6 rs!evalu_nachatat_tarbia_prof = 6 rs!evalu_mobadara_prof = 12 Else rs!evalu_absence_prof = 12 rs!evalu_retard_prof = 4 rs!evalu_nadawat_prof = 6 rs!evalu_nachatat_tarbia_prof = 6 rs!evalu_mobadara_prof = 12 End If وسأنصحك باستعمال فكرة الستاذ أبو احمد اذا كانت الجمل الشرطية كثيرة لأنها أسرع في الأداء 😇 * وجهة نظري غير ملزمة طبعاً 1
moho58 قام بنشر الأربعاء at 05:17 الكاتب قام بنشر الأربعاء at 05:17 السلام عليكم الأخ @AbuuAhmed والأخ @Foksh شكرا كثيرا لكما على الرد والمتابعة بعد تجربة المثالين - لو سمحتما عندي ملاحظة مشتركة - نحن وضعنا الشرط التالي: إذا كانت قيمة تقييم الغياب فارغة أو قيمة تقييم المبادرة فارغة : تصبح التقييمات كلها تحمل القيمة الافتراضية If IsNull(rs!evalu_moubadara_chaksia) And IsNull(rs!evalu_absence) Then rs!evalu_moubadara_chaksia = 4.5 rs!evalu_itkan_elamel = 4.5 rs!evalu_nachatat_tarbia = 4.5 rs!evalu_absence = 8 rs!evalu_retard = 4 rs!evalu_tatwir = 4.5 بعد تجربة المثالين: الخاصية هذه فقط محققة عندما يكون If typ = "مهندسين" أما باقي النوعين: معلمين وأساتذة فلا تتحقق. كما في الصورة 1 : نجعل الحقلين المعنيين فارغين نغلق النموذج ونفتح من جديد : نلاحظ القيم الافتراضية التلقائية رجعت فقط للنوع : مهندسين أما باقي الأنواع فلا. - الصورة2- حاولت كثيرا طبعا حسب معرفتي المحدودة- لكن لم تنجح محاولتي. ان شاء الله يكون هناك حل وبارك الله فيكما.
Foksh قام بنشر الأربعاء at 22:56 قام بنشر الأربعاء at 22:56 17 ساعات مضت, moho58 said: السلام عليكم وعليكم السلام ورحمة الله وبركاته .. لا اعلم ان كان ما فهمته صحيحاً ، لكن جرب هذا التعديل في المرفق . مع العلم ان القيم افتراضية من عندي ، فجرب كما ترغب في القيم واعطنا النتيجة BASE-E5.zip 1
moho58 قام بنشر الخميس at 11:45 الكاتب قام بنشر الخميس at 11:45 12 ساعات مضت, Foksh said: وعليكم السلام ورحمة الله وبركاته .. لا اعلم ان كان ما فهمته صحيحاً ، لكن جرب هذا التعديل في المرفق . مع العلم ان القيم افتراضية من عندي ، فجرب كما ترغب في القيم واعطنا النتيجة BASE-E5.zip 48.94 kB · 5 downloads جزاك الله خيرا وبارك الله فيك اخي @Foksh كوني جاءني سفر غير مبرمج. وليس لدي جهاز كمبيوتر لأجرب وانا اتابع من الهاتف حاليا عندما اعود يوم الأحد مساءا سأجرب الملف وأوافيك بالنتيجة ألف شكر مرة أخرى
Foksh قام بنشر الخميس at 12:46 قام بنشر الخميس at 12:46 منذ ساعه, moho58 said: كوني جاءني سفر غير مبرمج. وليس لدي جهاز كمبيوتر لأجرب وانا اتابع من الهاتف حاليا بالسلامة أخي الكريم .. خذ وقتك
moho58 قام بنشر منذ 5 ساعات الكاتب قام بنشر منذ 5 ساعات في 28/8/2025 at 00:56, Foksh said: وعليكم السلام ورحمة الله وبركاته .. لا اعلم ان كان ما فهمته صحيحاً ، لكن جرب هذا التعديل في المرفق . مع العلم ان القيم افتراضية من عندي ، فجرب كما ترغب في القيم واعطنا النتيجة BASE-E5.zip 48.94 kB · 16 downloads تحية طيبة أخي @Foksh و اعتذر ربما أخطأت ولم أشرح كما يجب القاعدةالمرفقة في الأسفل : الكود السابق الموجود في الوحدة النمظية - يقوم بالمهمة على أكمل وجه فقط مع النوع :مهندسين و تظهر القيم الافتراضية في النموذج أما النوع: اساتذة أو معلمين فالقيم الافتارضية لا تظهر وتظهر خانات فارغة كما في الصورة المرفقة أتمنى أن أكون قد أوصلت لك الفكرة : و يمكن التعديل على الكود فيؤدي المهمة مع جميع الأنواع وتظهر القيم الافتراضية لجميع الأنواع عندي فتح النموذج وبارك الله فيك BASE-E6.accdb
منتصر الانسي قام بنشر منذ 38 دقائق قام بنشر منذ 38 دقائق (معدل) تم تعديل الكود ملاحظة : في الجدول ومعيار تصفية النموذج عندك مكتوب (أستاذة) وفي الكود مكتوب (أساتذة) راجع أيهما خطأ وقم بتصحيحه تحياتي BASE-E6.rar تم تعديل منذ 31 دقائق بواسطه منتصر الانسي
الردود الموصى بها
انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد
يجب ان تكون عضوا لدينا لتتمكن من التعليق
انشئ حساب جديد
سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .
سجل حساب جديدتسجيل دخول
هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.
سجل دخولك الان