[لسه مبتدئ]

السلام عليكم 
اخواني انا عندي جدول يحتوي على اسم المشترك وتاريخ ميلاده وسداد الاشتراك على أقساط 
القسط الأول المفروض يسدده بتاريخ مثلا 25/2/2019  والقسط الثاني يسدد بتاريخ  25/3/2019

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

[elgokr]

وعليكم السلام ورحمة الله وبركاته

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

تقوم بعمل استعلام كالبحث عبارة عن الشكل التالى كمثال

كود :

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

تحياتى لك

وتمنياتى لك التوفيق

[لسه مبتدئ]

أشكرك أخي العزيز شكرا جزيلا وبارك الله لك

[elgokr]

الشكر لله والحمد لله

والحمد لله على كل حال

تحياتى لك

وتمنياتى لك التوفيق