Visual Basic - Problema con fechas y ADO

Estoy utilizando una conexion que ADO del SP 8 [Tambien eh utilizado 7 6 y el 5] el me guarda de maravilla, pero cuando guarda una fecha me guarda "01/01/1900" sabiendo que le llevo la fecha del sistema
Ejemplo:
Dim Cx as ADOODBC.Connection
Dim RX as ADOODBC.RecordSet
Set Cx = New ADOODBC.Connecction
Set RX = NEW ADOODBC.Recordset
Cx.Open ";dsn=MiConexion"
Set Rx = Cx.Execute ("Update Mitabla Set Fecha = "& Date &" Where Primaria = Opcion")

el aqui deberia llevarme la fecha del sistema pero me lleva la fecha que eh escrito arriba me pueden colaborar.

Gracias

Prueba utilizando Now, en lugar de Date.

hola pues a mi me paso algo similar no se si sea el caso pero yo lo resolvi poniendo la fecha entre comillas sencillas y si guardaba la fecha que le decia aunqu yo no usaba date yo la ponia de forma manual, no se si te sirva