Nunca usei o MSDE, mas dizem que é igual ao SqlServer, eu uso assim:
Dim Str_Inicio As String
Dim Str_Fim As String
Dim Str_Sql As String
Str_Inicio = CDate(Txt_Inicio.Text)
Str_Fim = CDate(Txt_Fim.Text)
Str_Sql = ""
Str_Sql = "SELECT * FROM FATURAS"
Str_Sql = Str_Sql & " WHERE"
Str_Sql = Str_Sql & " Emissao" & " >= '" & Mid(Str_Inicio, 4, 3) & Mid(Str_Inicio, 1, 3) & Mid(Str_Inicio, 7, 2) & "'"
Str_Sql = Str_Sql & " AND"
Str_Sql = Str_Sql & " Emissao" & " <= '" & Mid(Str_Fim, 4, 3) & Mid(Str_Fim, 1, 3) & Mid(Str_Fim, 7, 2) & "'"
RS_PREVAP.Open Str_Sql, Conexao, adOpenStatic, adLockReadOnly
Jayme