الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

كيف اجعل الاستعلام الذي في برنامج المرفق بصيغة سطر واحد ؟؟

بدأه softmail8 في 22 مايو 2013 · 2 رد · 640 مشاهدة · في لغة Ms Visual Basic 6 وما قبلها من إصدارات
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السادة الكرام
السلام عليكم ورحمة وبركاته
كيف اجعل الاستعلام الذي في برنامج المرفق بصيغة سطر واحد ؟؟
رجو من الله ثم منكم المساعدة في برنامجي المرفق
والله يحفظكم ويرعاكم ويجعل الجنة داركم الاخير

nor-01.rar

#2
 Set rs = db.OpenRecordset(" SELECT  *, Number , Name , datastart, endstart , DATEDIFF('d',NOW(),endstart) AS Diff  FROM soft WHERE DATEDIFF('d', NOW() ,endstart) <= 0  ORDER BY DATEDIFF('d',NOW(),endstart)")

    Set rs = db.OpenRecordset(" SELECT  *, Number , Name , datastart  , endstart , DATEDIFF('d',NOW(),endstart) AS Diff FROM soft ORDER BY DATEDIFF('d',NOW(),endstart)")
2

"نحن لا نستسلم... ننتصر أو نموت.... وهذه ليست النهاية... بل سيكون عليكم أن تحاربوا الجيل القادم والاجيال التي تليه... اما أنا... فإن عمري سيكون أطول من عمر شانقي."

عمر المختار

اللهم انعم على بلادي بالأمن والأمان

#3
عبدالجليل العقوري كتب:
 Set rs = db.OpenRecordset(" SELECT  *, Number , Name , datastart, endstart , DATEDIFF('d',NOW(),endstart) AS Diff  FROM soft WHERE DATEDIFF('d', NOW() ,endstart) <= 0  ORDER BY DATEDIFF('d',NOW(),endstart)")

    Set rs = db.OpenRecordset(" SELECT  *, Number , Name , datastart  , endstart , DATEDIFF('d',NOW(),endstart) AS Diff FROM soft ORDER BY DATEDIFF('d',NOW(),endstart)")

استاذي العزيز : عبد الجليل 

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

 لكم مني فائق الشكر والتقدير على المساعدة العاجله لنا والله يحفظكم ويرعاكم ويجعل الجنة داركم الاخير

ولكم مني فائق الاحترام والتقدير

مواضيع مشابهة

عدد الزوار حالياً

المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية

—الإجمالي—أعضاء مسجّلون—زوار بدون تسجيل

جارٍ التحقق من المتواجدين…