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

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


fatehtow

الردود الموصى بها

من الطرق السهلة والبسيطة التي يمكن استخدامها لفعل الحدث التلقائي هو استخدام الوظيفة [DoEvents] في دوارة [Do Until]

ويتم وضع الإجراء الذي يحتض هذه الدوارة عند اقلاع قاعدة البيانات وتظل الدوارة تعمل بفعل الوظيفة [DoEvents] حتى تطابق المعيار المطلوب.

 

هذا في نظري أفضل بكثير من استخدام حدث التوقيت [OnTime] في النموذج لأنه ليس من المنطقي أو المقول برمجيا إنشاء نموذج وابقائه مفتوحا من أجل فعل إجراء معين!

في المثال التالي وضعت بعض الإجراءات التي تقوم بتنفيذ استعلام التحديث في وقت أو تاريخ محدد؛ ولكي تتأكد من عمل مسابق ذكره فضلا استخدم  الإجراء [()UpDateDataInTime] .. فضلا استخدم التوقيت العسكري (24) لتحديد الوقت المطلوب للتنفيذ بين علامتي تنصيص مزدوجة.. كالتالي:

UpDateDataInTime("00:50:00") 'الساعة الثانية عشر وخمسين دقيقة

إليك المثال 

RunQueryInSpecificDate.zip

  • Like 1
رابط هذا التعليق
شارك

 

في 4/16/2017 at 02:56, عبد الفتاح كيرة said:

شكرا لك

أين نستخدم الإجراء

UpDateDataInTime

أرجو التوضيح

في 4/8/2017 at 23:45, أبو إبراهيم الغامدي said:

ويتم وضع الإجراء الذي يحتض هذه الدوارة عند اقلاع قاعدة البيانات

 

رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information