select by date

dear
I have problem if date 01/11/2014 in data records return =0 their are 2 records avl see my cod
Mprvstn = rs3!PRVSTN
Mdate = Format(rs3!EffDate, “dd-mm-yyyy”)
rs.Close
rs.Open “select * from SHEDUAL3 where prvstn='” & Mprvstn & “‘and EffDate=#” & Mdate & “#”
hrc = rs.RecordCount
thankes