مطلوب تشغيل استعلامين حسب شرط معين

مشاء الله تبارك الله لاقوة الا بالله

الله يعطيك الف الف عافيه والف شكر لك على المجهود الذي تبذلينة

سؤال اخير

بسنبه للإستعلام الثاني

اذا لم يتم فتح البرنامج في تاريخ 1/1  وتم فتح البرنامج  مثلا في 1/2 لان 1/1 كان يوم اجازة

فهل ستم تشغيل الاستعلام ام لابد من ان يكون البرنامج شغال في وحد واحد من كل سنه

والف شكر لك اختي الكريمه

سلمان الشهراني كتب:

مشاء الله تبارك الله لاقوة الا بالله

 

الله يعطيك الف الف عافيه والف شكر لك على المجهود الذي تبذلينة

 

سؤال اخير

 

بسنبه للإستعلام الثاني

اذا لم يتم فتح البرنامج في تاريخ 1/1  وتم فتح البرنامج  مثلا في 1/2 لان 1/1 كان يوم اجازة

فهل ستم تشغيل الاستعلام ام لابد من ان يكون البرنامج شغال في وحد واحد من كل سنه

 

والف شكر لك اختي الكريمه

بارك الله بك اخي الكريم

اذا كان البرنامج لن يعمل في ذلك اليوم فلا تشغل بالك فيكفي ان تستبدل الكود القديم الخاص بالسنة بهذا الكود الجديد الذي سيتولى المهمة عنك

ElseIf Date = LastDateOfYear  Then
DoCmd.SetWarnings False
DoCmd.OpenQuery "QR_Necessity_Upd", acViewNormal, acEdit
DoCmd.SetWarnings True
DoCmd.Requery
End If

ElseIf Date >= LastDateOfYear And Date <= LastDateOfYear Then
DoCmd.SetWarnings False
DoCmd.OpenQuery "QR_Necessity_Upd", acViewNormal, acEdit
DoCmd.SetWarnings True
DoCmd.Requery
End If

اختي الكريمه  الله يعطيك العافيه

تم تجربة البرنامج ولكن للاسف لم يعمل الكود حيث انه تم تعديل الساعة قبل 12 صباحاً وتم انتظرها حتى تجاوزت 2:00:01 AM اكثر من مره ولكن للاسف

نفس الشي كود السنه تم التجربه ولكن للاسف

تحياتي لك وشاكر لمجهودك الجبار

اخي الفاضل : سلمان

الملف بعد التديل بناء على طلبك

الآن تأكد من الجدول قبل فتح النموذج  ان الإجازة الإعتيادية تساوي  0.7  

وان الإجازة الإضظراية  تساوي   3  و  2 على التوالي للسجلات

قم بإغلاق القاعدة ثم قم بتغيير التاريخ من الجهاز  الى  01/01/1435

وايضا قم بجعل الوقت  من الجهاز  الساعة  12:01:00  مساء

ثم قم بفتح قاعدة البيانات وستجد انه قد تم تحديث الجدول  وخاصة حقل  الإجازة الإعتيادية الى  0.8  وايضا الإجازة الإضظرارية اصبحت 5

هذه الإحداث جميعها تقع عند فتح النموذج بارك الله بك وليس عند عداد الوقت 

za-Update-END.rar

بالتوفيق

الله يعطيك العافيه اخيتي

معليش تعبناك معانا

بس لمى يكون الكود عند الفتح العمليه بسيطه لكن ليست مجديه يعني كل مره افتح النموذج يحدث لي الاجازات وهذا راح يسبب لخبطه

يعني الموظف ياخذ الخمسه الايام اجازة اضطرارية ولمى افتح النموذج رجع الرصيد كامل

الي ابيه

راح اخلي البرنامج مفتوح على احد الاجهزة وابي كل اربعة وعشرين ساعة من حاله البرنامج يشغل استعلام (QR_Routine_Upd) مره واحدة حتى يكون دقيق في حسبه رصيد الاجازة الاعتيادية

وابي مع بداية كل سنه يشتغل استعلام QR_Necessity_Upd

تحياتي

سلمان الشهراني كتب:

الله يعطيك العافيه اخيتي

معليش تعبناك معانا

بس لمى يكون الكود عند الفتح العمليه بسيطه لكن ليست مجديه يعني كل مره افتح النموذج يحدث لي الاجازات وهذا راح يسبب لخبطه

يعني الموظف ياخذ الخمسه الايام اجازة اضطرارية ولمى افتح النموذج رجع الرصيد كامل

 

الي ابيه

راح اخلي البرنامج مفتوح على احد الاجهزة وابي كل اربعة وعشرين ساعة من حاله البرنامج يشغل استعلام (QR_Routine_Upd) مره واحدة حتى يكون دقيق في حسبه رصيد الاجازة الاعتيادية

 

وابي مع بداية كل سنه يشتغل استعلام QR_Necessity_Upd

 

تحياتي

حسنا اخي الكريم : سلمان

اتمنى ان تتبع الطريقة التالية بكل دقه خطوه خطوه

طالما انك سوف تترك الجهاز يعمل بدون توقف فهنا سوف نستخدم حدث عداد الوقت

1. لنفرض ان الموظف كان لديه 0.7 اجازة اعتيادية  وكان لديه متبقي من رصيده  حوالي  3 أيام  او يومين من الإجازة الإضطرارية كما في الجدول

2. للتجربة نقوم بعمل التالي :

نضع تاريخ الجهاز على  يوم 1434/12/30  هجري

نضع الوقت للجهاز  الساعة  11:59:00 مساءاً

3. نقوم الآن بتشغيل البرنامج وسيظهر لنا النموذج ننتظر الوقت حتى يصل الى الى الساعة  12:00:20 صباحا  و التاريخ  سيتحول الى  1435/01/01  هجري

4. الآن نغلق النموذج ونذهب الى الجدول للتأكد هل تم التحديث للإجازات أم لا

5. الآن اعد وقت وتاريخ الجهاز حسب الوقت والتاريخ الطبيعي

ولهذا عندما يكون الجهاز يعمل بدون توقف ويأتي الوقت وهو  الساعة 12:00:05 صباحا من كل يوم سوف يتم تحديث الإجازة الإعتيادية بمقدار 0.1

وايضا  عند تاريخ 1/1  من كل سنه سيتم تحديث الإجازات الإضطراريه الى 5 مباشرة بدون تدخل منك

ملاحظة : بما ان برنامجك مضبوط على التاريخ الهجري فيلزمك ان تختار اعدادات التاريخ من الجهاز على التاريخ الهجري

وهذا هو برنامجك بعد التعديل النهائي

za-Update-LAST.rar

بالتوفيق

الله يعطيك العافيه نعم صحيح تم عمله على الوجه المطلوب

ملاحظة بسيطه كان فقط كود

DoCmd.OpenQuery "QR_Necessity_Upd", acViewNormal, acEdit

يعمل ضمن الوقت 12:00:05 AM

وهذا يعني انه عند هذا الوقت سوف يضيف الى الرصيد خسمه ايام كل يوم

تم مسحه وعمل الكود 100%

اخيراً عاجز عن الشكر

تحياتي لك ولمى تقديمه اختي الكريمه