09-04-16, 02:32 AM
"select * from MA where strdate >='" + Format(ss.Value, "yyyy/MM/dd") + "'" + "and strdate<='" + Format(tt.Value, "yyyy/MM/dd") + "'"
datPrimaryRS.Refresh
If datPrimaryRS.Recordset.RecordCount = 0 Then
MsgBox "áÇíæÌÏ ÞíæÏ"""
Else
Set DataGrid1.DataSource = datPrimaryRS
End If
حيث اسم الحقل هو strdate عند البحث يظهر الناتج اذا كان هناك قيدين في سنوات مختلفة لكن اذا كانت في نفس السنة واختلاف في الاشهر لايظهر اي ناتج !!!
datPrimaryRS.Refresh
If datPrimaryRS.Recordset.RecordCount = 0 Then
MsgBox "áÇíæÌÏ ÞíæÏ"""
Else
Set DataGrid1.DataSource = datPrimaryRS
End If
حيث اسم الحقل هو strdate عند البحث يظهر الناتج اذا كان هناك قيدين في سنوات مختلفة لكن اذا كانت في نفس السنة واختلاف في الاشهر لايظهر اي ناتج !!!