ابوخليل

عليكم السلام اعتقد لو وضعت هذا السطر في اعلى الكود سيتجاوز الخطأ ولن تظهر الرسالة ، ولكن لن يتم التحديث على الحقل On Error Resume Next

هكذ هدايا والا فلا كنز من الأدوات والافكار بارك الله فيك وزادك علما ، وغفر لوالديك الذين انجبوا مثلك .. وغفر لنا ولك

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

الرسالة هذه تفيد عدم وجود بيانات تم اضافة سطر لتوضيح الحالة ملحوظة حتى تظهر المادة يجب ادخال تاريخ موجود في الجدول ExamTimeTable Dim i As String todd.Requery i = Nz(DLookup("[crs_cd]", "[ExamTimeTable]", "[edate] =#" & [Forms]![GyabF]![todd] & "#"), "") If i = "" Then MsgBox "لا يوجد اختبار في هذا التاريخ", , "" Else Me.crs_cd = i End If اذا لا تريد الرسالة والتنبيه يظهر تكتفي بهذه Dim i As String todd.Requery i = Nz(DLookup("[crs_cd]", "[ExamTimeTable]", "[edate] =#" & [Forms]![GyabF]![todd] & "#"), "") Me.crs_cd = i Gyab3.rar

جزاك الله خيرا ابا احمد الآن يمكننا العمل على هذه الخصيصة بلا حرج بمجرد الشكر من صاحب الموضوع او اي رد منه يدل على حصوله على حاجته .

عليكم السلام Dim i As String todd.Requery i = DLookup("[crs_cd]", "[ExamTimeTable]", "[edate] =#" & [Forms]![GyabF]![todd] & "#") Me.crs_cd = i Gyab2.rar

الفكرة حلوة ولكن تنفيذها استغرق منك استعلامات ونموذج فرعي وقوائم وخلف هذه القوائم اكواد وجمل برمجية طويلة .. انظر لطريقتي في تنفيذ الفكرة الاولى في Database6 والتي استخدمها في برامجي للحجب الثانية في Database7 وهي اختصار للأولى واستخدمها للاختيار عند الطباعة Downloads.rar

الملاحظة عند الاستاذ خليفة في الاظهار هو يظهرها جميعا . انا استخدم في برنامجي نظام : الحجب بديلا للحذف .. برنامجي للحضور .. فبعض المنتسبين قد يكون في اجازة او مهمة ولا نريده ان يظهر في سجلات الغياب لذا استخدم طريقتي كما المثال الذي ارفقته وعند حضور المنتسب افتح نموذج خاص بعكس العملية فاجد اسمه ظاهرا يحمل الاشارة .. فقط ازيل الاشارة عنه

<<<<< نعم >>>>>

عليكم السلام كيف اظهار بعد الاخفاء ؟ ما يصير الا من خلال ادوات اخرى بمعنى لما تخفيه من هذا النموذج يظهر في نموذج آخر مثلا لما تريد تستبعد سجلات لوقت محدد على كل حال في التعديل على المثال فكرة اخفاء السجل لما تريد اظهارها اعمل نموذج آخر لعكس العملية Database6.accdb

اخي ابو احمد اكثر من 300 مشاركة وتبخل علينا باختيار عنوان مناسب يصف الموضوع .. يعلم الله اني احرج كثيرا في تطبيق النظام وغلق المواضيع المخالفة

العلاقة غير منطقية ما دخل الصفوف بالدرجات ؟ العلاقة بين الصفوف والطلاب صحيحة العلاقة الاخرى يجب ان تكون بين الطلاب والدرجات

اخوي عمار لا تواخذني يمكن تكون انت السبب كيف ؟ تصميمك لعملك لا يشجع الأعضاء على التفاعل .. اكو ضوابط ينصح بها عند التصميم ونصيحتي لك ما دمت مبتدىء ان تتبع تطبيق هذه الضوابط .. ومن اهمها وهو الأهم : كتابة اسماء الحقول واسماء الجداول والنماذج وغيرها بحروف انجليزية لا يوجد بينها مسافات فارغة ان استمريت على هذا النهج باستخدام الحروف العربية .. فما يجب ان تتقنه في 6 اشهر لن تتقنه الا بعد 6 سنوات

اكثر من توصية .. هذا جميل ورائع وكونها تخص فريق الموقع اجمل وأروع الآن ابو ابراهيم لو قام بتوصية على اجابة يمكنني معارضته وأوصي باجابة اخرى مع ان النقاش تم فتحه من اجل كلمة : افضل اجابة ، وعلى دلالة هذا اللفظ والمفترض ان يكون دلالة من السائل على حصول الاجابة المطلوبة التي تناسبه وغلق الموضوع وقد ذكرت سابقا انني انظر الى المواضيع التي امامها علامة صح ولا ادخل اليها على اعتبار انها منتهية فلو كانت التسمية كلمة : ( تم ) او تمت الاجابة لكانت شافية وافية والسبب في ردي هذا احتمال عدم وجود توصيات وهذا وارد جدا .. وبالمقابل احتمال وجود اجابات افضل مما تم اختياره وارد جدا ايضا

اتفقنا على ان لا نتفق اخ يقول هي من حق السائل والاخر يعارضه بان السائل قد لا يفقه والآخر يكيل التهم للمراقبين بالتقصير واكثر من ذلك ومدير الموقع حفظه الله ينتظر ما تجتمع الآراء عليه فالحل احد امرين لا ثالث لهما : اما ان يكون هذا الزر من حق السائل .. هنا يجب تسمية الزر بما يتناسب وهذا الوضع . واما ان يتم الغاء الزر واخفاؤه .. ما لم يتطوع احد من الاخوة المشرفين ويجعله من اهتماماته