Problemas con consulta por fecha VB 6.0 con BD SQLserver

[polielb]

hola amigos, tengo una conexion a una BD de SQLserver con ADO, quiero hacer una consulta por fecha y no se cual seria la sintaxis correcta, le paso la consulta que creo en el SQL

SELECT * FROM Tabla WHERE (Fecha = CONVERT(DATETIME, '2004-12-14 00:00:00', 102))

eso es lo que me crea en SQL si cargo una fecha x

SELECT * FROM Tabla WHERE (Fecha = Fecha)

cual seria la sintaxis correcta en Visual Basic 6.0, lo tengo armado asi

Temporal.Open "SELECT * From Tabla WHERE (Fecha = " & fecha & " )", str

cuando logra pasar la consulta el recorset me queda siempre en -1 como si no tuviera nada