السلام عليكم
اخواني انا عندي جدول يحتوي على اسم المشترك وتاريخ ميلاده وسداد الاشتراك على أقساط
القسط الأول المفروض يسدده بتاريخ مثلا 25/2/2019 والقسط الثاني يسدد بتاريخ 25/3/2019
اعمل ايه علشان اخلي البرنامج يبلغني ان المشترك ميعاد تسديده فات
وبارك الله فيكم
وعليكم السلام ورحمة الله وبركاته
كل الامر فى حدث لود الفورم عند تشغيل البرنامج
تقوم بعمل استعلام كالبحث عبارة عن الشكل التالى كمثال
كود :
SELECT * FROM test WHERE in_date <= #now.date# and in_run = 0
وياليه كود تحقق اذا كان الاستعلام يحتوى على قيم نتائج
فيتم عرض النتائج فى داتا جريد مثلاً او ظهور رسالة تنبيه او فتح فورم مباشراً ليعرض به نتائج الاستعلام
المقصود بـ in_date هو تاريخ استحقاق السداد
وكلمة now التى تاتي بعد علامة = وهو المقصود بها تاريخ الان
ومن حيث in_run ووالقيمة 0 يعنى انه لم يقوم بالسداد
ومن يقوم بالسداد تجعل قيمتها 1 حتى لا تظهر معك فى نتائج الاستعلام
بكده هيكون اى حد مسجل بتاريخ استحقاق اصغر من او يساور تاريخ اليوم وان تحقق السداد = 0 يعنى غير مسدد
قم بتوليد نتائج الاستعلام وكود التحقق على هذا النحو
كود :
If DT.Rows.Count <> 0 Then
' طبق كود ظهور سالة او فتح فورم او تعبئة داتا جريد كما تشاء
End If
تحياتى لك
وتمنياتى لك التوفيق
أشكرك أخي العزيز شكرا جزيلا وبارك الله لك