اذهب الي المحتوي
أوفيسنا

moho58

04 عضو فضي
  • Posts

    629
  • تاريخ الانضمام

  • تاريخ اخر زياره

السمعه بالموقع

58 Excellent

2 متابعين

عن العضو moho58

  • تاريخ الميلاد 01 ينا, 1985

البيانات الشخصية

  • Gender (Ar)
    ذكر
  • Job Title
    لاشيء
  • البلد
    عمان
  • الإهتمامات
    الأكسس

اخر الزوار

3,478 زياره للملف الشخصي
  1. بارك الله فيك اخي الكريم جزاك الله خيرا
  2. السلام عليكم تحية طيبة استاذنا الجليل ابو خليل و أعتذر على كيفية تجهيز المثال بعد التجـــــــربــــــة : الطريقة ناجحة و ممتازة وتفي بالغرض وبدون مشاكل - فجزاك الله كل الخير - وبهذا أصبح لنا طريقتين لالغاء الحفظ التلقائي في النماذح المستمرة سواء عن طريق انشاء نموذجين (نموذج للعرض وآخر للتعديل) أو الاعتماد مباشرة على نموذج واحد (المثال الأخير). مرة اخرى اتوجه إليكم بالشكر الجزيل: الاستاتذة الكرام على مساهماتكم في هذا الموضوع جزاكم الله كل خير
  3. جزاك الله كل الخير الأخ والأستاذ الفاضل وربي يبارك لك في جميع أمورك هذا هو المطلوب بالضبط فقط انا قمت بكتابة LEFT مكان INNER حتى يظهر جميع الموظفين في جدول tbl_evaluation وهذا عند الضغط على زر إدارج ، حتى وإن كان الموظفين غير موجودين في جدول : tbl_poste_superieur ألف شكر وامتنان أخي
  4. اخي الكريم تقريبا هذا هو المطلوب فقط في النموذج وعند اختيار الشهر يوجد كود في حدث بعد التحديث لم اضعه انا من قبل ونسيته لكي تستعمله انت في الكود الجديد الخاص بك الكود هو وعند اختيار الشهر اجراء حدث بعد التحديث: Me.Text1 = Me.mois.Column(2) Me.Text2 = Me.mois.Column(1 وجزاك الله خير
  5. تحية طيبة أخي الكريم جزاك الله كل الخير تقريبا هذا هو المطلوب بالضبط أعذرني نسيت ولم انتبه أن اضع كود في النموذج وعند اختيار الشهر اجراء حدث بعد التحديث: Me.Text1 = Me.mois.Column(2) Me.Text2 = Me.mois.Column(1) لانهما موجودين في الكود السابق: If IsNull(Me.annet) Or IsNull(Me.mois) Then Beep MsgBox "يجب ادخال السنة والشهر", , "تنبيه" Exit Sub Else DoCmd.SetWarnings False DoCmd.RunSQL "INSERT INTO tbl_evaluation (classementliste,loifondamontale,num, numFonctionnaire, prenomArabe, gradePosteActuel, annet, mois, part_year ) " & vbCrLf & _ "SELECT tbl_info_fonctionnaire.classement_liste,tbl_info_fonctionnaire.loi_fondamontale,tbl_info_fonctionnaire.num, tbl_info_fonctionnaire.num_fonctionnaire,tbl_info_fonctionnaire.prenom_arabe, tbl_info_fonctionnaire.grade_poste_actuel, [forms]![frm_AddMonth]![annet] AS Expr1, [forms]![frm_AddMonth]![mois] AS Expr2, [forms]![frm_AddMonth]![text1] AS Expr3 " & vbCrLf & _ "FROM tbl_info_fonctionnaire" DoCmd.SetWarnings True MsgBox "تم الادراج", , "" End If وكذلك رسالة التنبيه أخي التي أضفتها رغم ان السنة و الشهر للموظف غير موجودين في الموظف : مع ذلك تأتي رسالة تخبرك بوجوده من قبل وشكرا كثيرا
  6. تحية طيبة أخي الكريم شكرا كثيرا على الرد والاهتمام بموضوعي هذا البرنامج خاص بتقييم آداءات الموظفين (بناء على طلب لي سابق في المنتدى بمساعدة أحد اساتذتنا الأفاضل) وقد اختصرت منه وأبقيت فقط على المهم والذي احتاجه في طرح سؤالي tbl_info_fonctionnaire : فيه جميع المعلومات الخاصة بالموظفين tbl_evaluation: فيه معايير تقييم أداءات الموظفين يتم الحاق بيانات الموظفين من جدول المعلومات الخاص بالموظفين التي أحتاجها إلى جدول معايير الموظفين وهذا بواسطة الكود السابق الذي يشتغل جيدا- بناء على احتياجاتي اردت فقط تعديله وادخال معلومات جديدة إلى جدول معايير الموظفين (tbl_evaluation) إنطلاقا من جدول: tbl_situation_juridique_mouv و جدول: tbl_poste_superieur أخي الفاضل: البرنامج فيه بيانات موظفين ومعلومات وفيه كذلك تقييمات لذلك: أريد الابقاء على جميع الجداول وبنفس التسميات و اعمل تحديث للكود لاضافة الحقلين في جدول tbl_evaluation حتى لا يكون هناك تأثير على بياناتهم و تقييماتهم . ان شاء الله أكون قد أوصلت لك الفكرة و جزاك الله كل الخير أخي الفاضل.
  7. السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل في هذا الموضوع أريد تعديل لكود إدراج بيانات جدول (مرتبط بجدولين آخرين) في جدول آخر: اني عندي جدول اسمه tbl_info_fonctionnaire الكود الحالي يقوم بادراج بيانات جدول tbl_info_fonctionnaire في جدول : tbl_evaluation (الكود موجود في النموذج وفي الزر المسمى إدراج). لاحتياجاتي في العمل : اريد إضافة بيانات ( حقلين آخرين من جدولين آخرين ) في جدول tbl_evaluation : الحقلين هما: الحقل الذي اسمه: situation_special من جدول : tbl_situation_juridique_mouv الحقل الذي اسمه: nom_poste من جدول : tbl_poste_superieur الجدولين عندهم علاقة بالجدول tbl_info_fonctionnaire : عن طريق الحقلين num و code_fonctcode كما في الصورة يعني في النهاية أجد في جدول tbl_evaluation بيانات الحقلين situation_special و nom_poste والذين يتم ادراجهما بياناتهم من الجدولين tbl_situation_juridique_mouv و tbl_poste_superieur الرجاء المساعدة والتوجيه وجزاكم الله خيرا ان شاء الله BASEM.accdb
  8. زيادة الخيـــــــر خيريــــــن مثال رائع وجميل جدا جزاك الله خيرا أستاذنا المثال يقوم بما يقوم به إكسل من حفظ وتراجع عن الحفظ ، وعند الخروج يخيرك بين الحفظ من عدمه ( طبعا في حالة الخروج ودون الضغط على زر حفظ الموجود في النموذج) صراحة مثال رائع جدا جدا أستاذنا @Moosak عند استفسار إن أمكن أنا اريد فتح هذا النموذج حسب حقل region أنشأت نموذج وبه مربع سرد وتحرير لاختيار وفتح النموذج حسب حقل region لكن الضغط على زر فتح النموذج حسب اختيار من مربع السرد والتحرير تظهر الرسالة المبينة في الصور : وجزاك الله كل الخير ان شاء الله UsingTransactionNoClass_1.accdb
  9. وهو كذلك اخي الكريم - هذا هو المطلوب بالضبط جزاك الله كل الخير ألف شكر وامتنان
  10. السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل في هذا الموضوع أريد استخراج كلمة من مربع سرد وتحرير (الموجودة مباشرة بعد الرمز / ) و وضعها في مربع نص: في النمودج عندما اختار سنة العمل من مربع مربع السرد والتحرير : 2020/2019 تعطيني النتيجة في مربع النص المسمى a النتيجة: 2020 2021/2020 تعطيني النتيجة في مربع النص المسمى a النتيجة: 2021 2022/2021 تعطيني النتيجة في مربع النص المسمى a النتيجة: 2022 2023/2022 تعطيني النتيجة في مربع النص المسمى a النتيجة: 2023 .... وهكذا الرجاء المساعدة والتوجيه وبارك الله فيكم BASEK.accdb
  11. بعد التجربة المطولة شغال الكود بامتياز ويؤدي الغرض المطوب جزاك الله كل خير الأستاذ الفاضل @kkhalifa1960 وجعله الله في ميزان حسناتك ورزقك خيرا في الدنيا والآخرة
  12. أعتذر عن التأخر في الرد استاذنا الفاضل بعد التجربة أستاذنا الفاضل: حقيقة الكود شغال بامتياز وبدون مشاكل - رائع جدا جدا-هذا هو المطلوب بالضبط رحم الله والديك وجزاك الله كل الخير في الدنيا والآخرة وجعله الله في ميزان حساناتك - ورفعك الله في العلم درجات - و وفقك وأعانك الله على فعل الخير
  13. معذرة على التأخر في الرد بعد التجرب أخي الكريم الكود رائع جدا أخي الفاضل و شغال - لكن لا يقوم بتخزين قيمة code_stagiere المنشأة في جدول info_stagiere وبارك الله فيك أخي و جزاك الله كل الخير ورفعك في العلم درجات
  14. السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل لدي جدول فيه بيانات طلاب كمايلي: السنة الوظيفة الإسم الأول الإسم الثاني عندي جدول آخر يمثل رموز وظائف الطلاب : مثال: الوظيفة : أستاذ: رمزها: A رقمها: 50 ---- الوظيفة : مساعد معلم رمزها B : رقمها: 60 في هذا الموضوع اريد إنشاء رمز (كود ) للطلاب كمايلي: من النمودج frm_stag : مثال: من النمودج أختار السنة 2024 والوظيفة : أستاذ تظهر قائمة الطلاب واعرض التقرير : في التقرير أريد إضافة رمز الطلاب : رمز الطلاب يكون كمايلي: الوظيفة المختارة هي أستاذ: رقم الوظيفة هو : 50 رمز الوظيفة هو : A حسب الجدول فيكون رمز الطلاب كمايلي: الطالب الأول A50 الطالب الثاني A51 الطالب الثاني A52 إلى غاية انتهاء الطلاب الموجودين في الجدول بالنسبة للسنة: 2024 والوظيفة : استاذ وحسب ترتيب ID للطالب إذن رمز الطلاب يتكون من : رمز الوظيفة + رقم الوظيفة (موجودين في جدول code_grade وبعد يكون إضافة رقم 1 (+1) إلى غاية نهاية الطلاب . نفس الشئ لباقي السنوات والوظائف . نتمنى أنه يمكن تنفيذ الفكرة بشرط الابقاء على حقل ID ترقيم تلقائي ومفتاح اساسي في جدول info_stagieire الرجاء المساعدة والتوجيه وبارك الله فيكم baseA.accdb
  15. الأساتذة الأفاضل @kkhalifa1960 @Foksh @ابو جودي نمودج حجز علامات الطلاب بشكل عمودي (يتم حجز درجات جميع الطلاب حسب المادة التي يدرسونها) باستعمال الأسهم عند حجز البيانات : الهدف هو التخلص من الحفظ التلقائي للأكسيس والاقتصار على زر حفظ فقط. نموذج درجات الطلاب وأستعمله كل سنة وحسب السنة التي درسو فيها - لنفرض أنه بعد ثلاث سنوات من حجز درجات الطلاب حسب السنة أردت مثلا أن أدخل إلى سنة معينة وأتفحص درجات الطلاب وبالخطأ وبدون انتباه اثناء التفحص غيرت درجة من درجات الطلاب : عند الخروج من النموذج بما أنني لم أضغط على زر حفظ : فلن يؤثر ولن تتغيير درجة الطلاب في حالة التغيير عن طريق الخطأ. مثال: في السنة الحالية انا اريد حجز درجات الطلاب : (يتم حجز درجات جميع الطلاب حسب المادة التي يدرسونها) باستعمال الأسهم اقوم بحجز درجات الطلاب عند الانتهاء من عملية الحجز أضغط على زر حفظ لذلك أردت زر "حفظ" يلخص المطلوب عند الضغط عليه أختار: إما أحفظ البيانات أو لا أحفظها. عند الخروج من النموذج: ما لم أضغط على الزر حفظ لا يحدث اي شئ أو تغيير حتى وإن غيرت في درجات الطلاب بالخطأ ولا أعلم. هكذا أريد الأساتذة الكرام إن كان قابل للتجسيد بالطبع بالنسبة لمرفق الأستاذ الفاضل kkhalifa1960 كل ما أدخلدرجة طالب يخبرك بالحفظ أو لا : وأنا عندي طلاب كثيرون : لنفرض اني عندي 200 طالب : ,أحجز درجاتهم حسب المادة: كل طالب يلزمني أوافق على رسالة التنبيه لكي أحفظ البيانات. بالنسبة لمرفق الأستاذ الفاضل ابو جودي أنا عندي طلاب كثيرون ,اقوم بادخال درجاتهم حسب المادة بالنسبة لاستفسارك الأستاذ الفاضل Foksh لم قمت بادخال 5 سجلات ، وتريد الخروج بدون حفظ هذه السجلات تريد ان يتم التراجع عن الإضافات والتعديلات الأخيرة لأنك لم تقم باختيار حفظ : نـــــــعم وجزاكم الله خيرا في الدنيا والآخرة ان شاء الله
×
×
  • اضف...

Important Information