[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

تحياتى لك

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