Visual Basic - adobd EOF al abrir

Hola estoy trabajando con un recordset en ado al abrirlo pongo:
rs.Open ("select * from reservas where fecha like " & Calendar1.Day & "/" & Calendar1.Month & "/" & Calendar1.Year), conexion

luego pongo

while not rs.EOF
bla bla bla
wend

el punto es que nunca entra al while porque abre el rs y siempre esta en EOF

porque puede ser esto?

Pues pq esa consulta te devuelve 0 filas.

No recuerdo ahora, pero el LIKE no llevaba = ??

nop

El problema es en la sentencia sql porque al comparar las fechas aunque sean iguales no las considera iguales, no se por que , ambas estan en formato Date
y a simple vista son iguales, pero sql no lo ve asi... cual sera el problema????

Quien me va a ayudar por favor...

Ya lo hice muchas gracias a todos los que contestaron