Visual Basic - Consulta a SQL SERVER

Tengo, en mi codigo VB, la siguiente consulta contra una BD hecha en SQL SERVER:

dim str as string
dim rs as new ADODB.RecordSet

str = " select data from zprova where data > '01/07/2004 7.00.00'"
rs.Open str, conris, adOpenDynamic, adLockOptimistic

Cuando la ejecuto, me da el siguiente error:
La conversion del tipo de datos de char a datetime a generado un valor de tipo datetime
no comprendido en el intervalo de valores validos.

Sabeis como hacerlo sin que me de error?
Si la query la hago asi:
str = " select data from zprova where data > '01/07/2004'"
, no me da error, pero la cuestion es que necesito tener en cuenta tambien la hora.

Gracias. Espero alguna respuesta.

YA HE ENCONTRADO LA SOLUCION.
POR SI A ALGUNO LE INTERESA, SE RESUELVE USANDO LA FUNCION CONVERT, POR EJEMPLO:

WHERE (data > CONVERT(DATETIME, '2004-07-01 07:00:00', 102))

Saludos de un murciano desde Florencia