[سؤال] بخصوص تاريخ سداد اشتراك - نسخة قابلة للطباعة

[سؤال] بخصوص تاريخ سداد اشتراك - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : [سؤال] بخصوص تاريخ سداد اشتراك (/showthread.php?tid=28743)

بخصوص تاريخ سداد اشتراك - لسه مبتدئ - 24-02-19

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

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

RE: بخصوص تاريخ سداد اشتراك - elgokr - 24-02-19

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

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

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

كود :

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

تحياتى لك

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

RE: بخصوص تاريخ سداد اشتراك - لسه مبتدئ - 25-02-19

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

RE: بخصوص تاريخ سداد اشتراك - elgokr - 25-02-19

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

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

تحياتى لك

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