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

[softmail8 0]

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

nor-01.rar

[عبدالجليل العقوري 18]

 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)")

 

 

 

[softmail8 0]

 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)")

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

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

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

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