problemas al guardar fecha en base de datos

[Adler]

Hola

¿Trabajas en local? Prueba así, esto te soluciona el problema de los digitos de una cifra (gracias a Shiryu_Libra)

if (isDate(request.form("data_naixement"))) then
f_data_naixement = FormatDateTime(request.form("data_naixement"),2)
Dim Dte,dia,mes,anyo,fecha
Dte = f_data_naixement
if len(day(Dte)) = 1 then dia=0 & day(Dte) else dia= day(Dte) End if
if len(month(Dte)) = 1 then mes= 0 & month(Dte) else mes= month(Dte) End if
fecha =day(Dte)&"/"&month(Dte)&"/"&anyo(Dte)
else
f_data_naixement = "01/01/1900"
end if

strSQL = "UPDATE curriculums SET data_naixement ='"&fecha&"' WHERE codi="&f_id&""


Si no trabajas en local depende de la configuración del servidor

Suerte