20-10-12, 05:50 PM
تفضل هذا الكود
انشاء الله سيفى بالغرض
Dim from As Date
from = Format(text1, "mm/dd/yyyy")
Too = Format(text2, "mm/dd/yyyy")
Select * from tb1 where Dare between #" & CDate(from) & "# AND #" & CDate(Too)
انشاء الله سيفى بالغرض
Dim from As Date
from = Format(text1, "mm/dd/yyyy")
Too = Format(text2, "mm/dd/yyyy")
Select * from tb1 where Dare between #" & CDate(from) & "# AND #" & CDate(Too)
