13-01-18, 01:06 PM
تم حل مشكلة التاريخ بدون تعديل تاريج جهاز العميل
كود :
Private Sub Command1_Click()
Dim Too As Date
Dim from As Date
from = Format(DTPicker1, "mm/dd/yyyy")
Too = Format(DTPicker2, "mm/dd/yyyy")
Set RS = New ADODB.Recordset
RS.Open "Select * FROM TableName Where Date Field BETWEEN #" & CDate(from) & "# AND #" & CDate(Too) & "# ", Db, adOpenStatic, adLockOptimistic
Set DataGrid1.DataSource = RS
End Sub
اعز معلمين :
1) Ahmed _Mansoor
2) sniper.ps
3) myalsailamy
4) ahmedabdelaliem
5) sendbad100
6)Amir_alzubidy
1) Ahmed _Mansoor
2) sniper.ps
3) myalsailamy
4) ahmedabdelaliem
5) sendbad100
6)Amir_alzubidy
