Programacion: Obtener la fecha de un campo en insertarla en VB6

Por peticion de uno de mis discipulos :)
Aqui esta un ejemplo del codigo que se necesita para ingresar una fecha en una base de datos

fecha = Format(Now, "yyyy/mm/dd")
Cmd.CommandText = "INSERT INTO H_historial_pagos VALUES(" & usuarios_id(Me.res_pago.ListIndex) & "," & CDate(fecha) & ")"

O puedes hacerlo asi:

Cmd.CommandText = "INSERT INTO H_historial_pagos VALUES(" & usuarios_id(Me.res_pago.ListIndex) & "," # CDate(fecha) # ")"

El campo de la tabla debe ser datetime

OffTopic: Feliz Cumple Sylvia Helena!!!

Pues hace rato que no posteo nada por aca (digamos que falta de tiempo) pero que mejor oportunidad que esta 10 de octubre dia en que mi hermana querida cumple añitos....
le deseo lo mejor de lo mejor y q1ue siga siendo asi de especial.... pero que no sea tan chichoza..

Espero que pases un buen dia.... aunque tengas que ir a clases....