[جاسم عبد]

(08-09-18, 12:27 PM)ahmedalrawad كتب : هل من احد هنا يرد علينا

السلام عليكم
اليك هذا الكود

كود :

If RS.State = adStateOpen Then RS.Close
RS.Open " select * from [test] where [DTSin] Between #" & DTPicker2.Value & "# AND #" & DTPicker3.Value & "#", CN, adOpenStatic, adLockReadOnly
Set Report.DataSource = RS
Report.Show