المساعدة فى عمل رسالة تنبيه بناء على تاريخ الجهاز

[أكسس وبس]

اخوانى

ممكن طريقة لعمل رسالة تنبيه بوحدة نمطية دون ربطها على نموذج معين لتظهر الرسالة بدون تشغيل البرنامج او اثناء تشغيله وربط الرسالة مع التاريخ الكمبيوتر وتظهر قبل تاريخ الذى احدده ب 3 ايام

 

[أكسس وبس]

اخوانى كل عام وانتم بخير

[أكسس وبس]

ممكن يا اخوانى الكود عملت استعلام

tblID رقم

CustomersID كود العميل

DateQest تاريخ الدفع وعملت معيار <=Date()+3

Halt معيار لم يدفع

check1 نعم او لا وقيمتها 0

[أكسس وبس]

ممكن المساعدة يا اخوانى رمضان كريم

[أكسس وبس]

يا اخوانى

عملت الكود مرة عند تحميل نموذج الدخول بس البرنامج مصمم بشريط قوائم منفعتش بيعطل نموذج الدخول ويفتح نموذج over_date الخاص بالاقساط التى قاربت على السداد

Dim intStore As Integer

intStore = DCount("[tblID]", "[over_date1]", "[DateQest] <=Date()+3 AND [check1] =0 ")

    If intStore = 0 Then

Exit Sub

Else

If MsgBox("يوجد شخص أو أكثر قاربت اقساطهم على السداد" & vbCrLf & _

"فتح نموذج", _

vbExclamation + vbYesNo, _

"الاقساط المنتهية") = vbYes Then

DoCmd.close acForm, "Indx", acSaveYes

DoCmd.OpenForm "over_date", acNormal

 Else

 Exit Sub

 End If

End If

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

over_date

دى صورة البرنامج  لما يفتح

 

[أكسس وبس]

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

[عبد اللطيف سلوم]

السلام عليكم 

اخي الكريم

حسب اعتقادي لا بد من وضع معيار في استعلام 

حتى تستطيع الحصول على المعلومات ومطابقتها مع الشرط او المعيار

وما المشكلة اذا وضعت الكود لاظهار رسالة التنبيه في النموذج الرئيسي عند فتح البرنامج ؟

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

 

[أكسس وبس]

اشكرك اخى الكريم

عملت المعيار فى الاستعلام على حقل التاريخ ()date

المشكلة عاوز رسالة التنبيه بوحدة نمطية تقوم بمراجعة الاستعلام الى به المعيار واذا اطبق الشرط تظهر رسالة بدون الربط معى اى نموذج

تم تعديل أبريل 18, 2021 بواسطه أكسس وبس

[أكسس وبس]

رمضان كريم

طيب ينفع ولا مش ينفع انفذ رسالة تنبيه من وحدة نمطية تشتغل من نفسها

[أبو عبدالله الحلوانى]

أرجو ان يكون هذا ما تريد

 

جرب ووافنا بالنتائج

 

TestMessage.accdb

[أكسس وبس]

تسلم هو ده المطلوب

[kha9009lid]

في ١٧‏/٤‏/٢٠٢١ at 22:23, أكسس وبس said:

منفعتش بيعطل نموذج الدخول ويفتح نموذج over_date الخاص بالاقساط التى قاربت على السداد

 

52 دقائق مضت, أكسس وبس said:

تسلم هو ده المطلوب