enviar Date a BBDD

[AHRIMANES_6x3]

guenas
reciente mente tube un problema similar.. todos mis campos se guardaban corectamente pero los que eran dateTime no pasaban a la base por nada al final quedaban como Nulos... la forma en que lo solucione fue algo como esto:

str = "insert into pruebas (dato1,dato2,dato3) values('" & UCase(dato1) & "',cast('" & dato2 & "' as datetime)," & dato3 & ")"

ojo en """"cast('" & dato2 & "' as datetime)"""""

espero aya sido de ayuda...