ابوخليل

رائع وجميل جزاك الله خيرا وأحسن اليك

الف مليون شكرا لا تفي بحقك ابداع وحوكمة وجمال منقطع النظير نسأل الله الكريم ان يجعل عملك هذا خالصا لوجهه ، وأن يجزاك عنا وعن اخوانك خير الجزاء

سبحان الله اصلا عدد الموظفين = 5 الاقتطاع مرة واحدة فقط للموظف خلال الشهر المحدد والسنة المحددة ... هذا منطقي ما المشكلة؟ اذا حذفت سجلات الاقتطاع الجديد من الجدول يمكن اعادة العملية .. انا جربتها قبل الرفع اكثر من مرة

تم تغيير بعض المعايير في الاستعلام جرب الآن وأخبرني جدولك كما هو لم اغير فيه شيء عدم الاقتطاع14.rar

مؤكد الخلل في الجدول لأن الاستعلام لا يجلب بيانات دعني اجري بعض العمليات : 1- سأستبعد السجلات التي مبالغها اكبر من 3000 2- سأستبعد الوظائف التي رقمها اكبر من 5 3- سأستبعد الموظفين التي معرفاتهم ليست بين 1 و 5 ثم انظر ماذا يبقى لنا .. وسأخبرك بالنتيجة

فقط عليك نقل الفورم + الدالتين حتى تبحث عن المشكلة : الاستعلامات مصدرها 3 جداول يجب ان تتأكد من جداولك انها متطابقة مع الجداول في المثال Employee tbl_Loans TblDetaché

انظر تم تعديل طفيف الجدول لا يوجد به بيانات .. جرب الآن عدم الاقتطاع11.rar

اخي الكريم نزل مثالي مرة اخرى افتح النموذج واختر شهر 3 ثم انقر على زر اقتطاع الانخراط ثم افتح الجدول ستجد انه اضاف 4 سجلات وهي الموجودة فعلا حسب الضوابط

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

لديك مشكلة اساسية وهي ربط تاريخ الكمبيوتر بالتنفيذ يعني لا يمكن التنفيذ حتى تغير تاريخ الجهاز الى شهر 3 وهذا خطأ يجب معالجته حسب الطرق الصحيحة المتبعة وهذا ما سأقوم بتعديله لك مع الأخذ بالاحترازات اللازمة وبناء على هذا التعديل يجب التعامل مع القيم حسب تاريخ التنفيذ وتعديل جميع التواريخ في الكود بمعنى اليوم الموافق 15/2/2026 سوف اجري اقتطاع لشهر 3 فيجب ان يرصد وقت التنفيذ تاريخ اليوم في الجدول ويتم رصد تاريخ 1/3/2026 بمعنى انه يعتمد اليوم الأول من شهري 3 و 7 كتاريخ للدفع

الطرح مبهم يجب عليك الشرح بتفصيل على النحو التالي : 1- نوع العمل او المشروع الذي تعمل عليه 2- نوع البيانات المدخلة بكل شيت 3- ما هي البيانات الثابتة تقريبا 4- ما هي البيانات المتجددة التي يتم ادخالها بانتظام 5- ارفاق الشيتات بلمف مضغوط بشرط ان تشتمل على بيانات حتى لو كانت هذه البيانات وهمية 6- ما المطلوب في المخرجات .. اي : ما التقارير التي تريد اخراجها وطباعتها هنا يمكن للاخوة هنا مساعدتك في بناء برنامجك

شكرا الف استاذنا المبدع الكريم على هذا الاثراء اداة جميلة احترافية تختصر الكثير من الوقت والجهد .. خاصة الأحداث الخاصة بالمربعات المعاناة .. هي في كثرة الحاجة اليها وتكرارها في كثير من النماذج

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

شكرا جزيلا استاذنا .. معلومة جديدة .. وحقيقة ليتك تفرد هذه المشاركة بموضوع وعنوان جديد يخصها لتفردها ومن اجل سهولة البحث والوصول اليها على فكرة الباسوورد 16 حرف هو المتبع الآن في مواقع بوابات رسائل الـــ sms من اجل ربط التطبيقات بالبوابة للارسال من خلالها ويسمونه Token

عفوا .. اقصد ان الدالة تقوم بحماية الحقول بينما هي محمية بالفعل لجعل الحقول قابلة للتحرير اعتقد ستصبح الدالة هكذا Private Sub Add_New_Record() Me.comresearch_01 = Null dateoftrans.Locked = False Me.stat.Locked = False Me.F_DATAILS.Locked = False DoCmd.GoToRecord , , acNewRec End Sub