13-07-14, 04:55 PM
(12-07-14, 09:49 PM)vbnet كتب : .....
كود :
Set rs = db.OpenRecordset("SELECT ........
If rs.RecordCount = 0 Then
MsgBox "عفواً... لا توجد معلومات.", vbMsgBoxRight + vbMsgBoxRtlReading
End If
.....
---------------------------------------------------------------------------------------
اخي العزيز
السلام عليكم ورحمة وبركاته
لك مني فائق اشكر والتقدير على ما تقدمة من دعم فني والله يحفظكم ويرعاكم
ولكم مني فائق الاحترام
إذا ضاقت بك الأحوال يوماً فَثِقْ بالواحِدِ الفَرْدِ العَلِيِّ

