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

[OYEME]

seria asi:
Temporal.Open "select * from tabla where fecha ='01/01/01'"
y solo reemplaza la fecha por un var
Temporal.Open "select * from tabla where fecha ='" & fec "'"

ahora hay veces la fecha esta en formato m/d/aa tonces utiliza
format("mm/dd/yyyy",fec)