10-08-22, 01:24 PM
وعليكم السلام ورحمة الله وبركاته
استخدم هذا الكود :
وقيمة المتغير (bExpiryDate ) قارنها مع الحقل في قاعدة البيانات : فأي قيمة أقل منها أو تساويها تعرضها في جدول المشارف ع الانتهاء.
استخدم هذا الكود :
كود :
Dim bExpiryDate As String
bExpiryDate = Date.Today.AddDays(91).ToString("yyyy-MM-dd")وقيمة المتغير (bExpiryDate ) قارنها مع الحقل في قاعدة البيانات : فأي قيمة أقل منها أو تساويها تعرضها في جدول المشارف ع الانتهاء.
قال صلى الله عليه وسلم:
«كلمتان خفيفتان على اللسان
ثقيلتان في الميزان،حبيبتان إلى الرحمن:
سبحان الله وبحمده، سبحان الله العظيم».