Hola.. mira... si quieres obtener la fecha.. para que no tengas problemas puedes hacer algo como esto:
Fecha = Format(Now, "dd/mm/yyyy hh:mm:ss")
para obtenerlo de tipo, "11/10/2002 18:30:20" por decir.. algo.. y esto lo guardara en tu BD de SQLserver.. sin problemas.. al menos eso es lo que utilizo en mi caso...
Aunque puedes utilizar por ejemplo la funcion covert como dice que compañero Avelar que es propia del SQL server.. para poder insertar los campos fechas...
insert into(......) values(convert(datetime,'" & Fecha & "',103))
Saludos y suerte..
