كيف اعرض نتائج البحث بين تاريخين في الفلوكس قريد

ارجو اعطائي كود يعرض نتائج البحث بين تاريخ الحالى للجهاز وتاريخ احددة انا عن طريق تاكس انا استعملت هذا الكود لكنة موضابطمعي

Private Sub Command1_Click()

On Error Resume Next

Dim Rs As New ADODB.Recordset

Dim SQL As String

SQL = "select * from table1 where pirod1 between '" & Format(Text1.Text, "DD/MM/YYYY") & "' and '" & Format(Text2.Text, "DD/MM/YYYY") & "' order by MSTAJER"

Set Rs = Cn.Execute(SQL)