Originariamente inviato da cuollins
Ok raga, prendete nota potrebbe servire anche a voi :
questa funzione l'ho adattata anche a db mssql e funziona!!! assafà.
function formatDBDate(argDate,argDB)
dim tmpdate,tmpdateoutput
tmpdate = argDate
select case argDB
case "mdb"
tmpdateoutput = "#yyyy-mm-dd h:m:s#"
case "mysql"
tmpdateoutput = "'yyyy-mm-dd h:m:s'"
case "mssql"
tmpdateoutput = "'yyyy/mm/dd h:m:s'"
end select
tmpdateoutput = replace(tmpdateoutput,"dd",right("0" & day(tmpdate),2))
tmpdateoutput = replace(tmpdateoutput,"mm",right("0" & month(tmpdate),2))
tmpdateoutput = replace(tmpdateoutput,"yyyy",year(tmpdate))
tmpdateoutput = replace(tmpdateoutput,"yy",right(year(tmpdate),2))
tmpdateoutput = replace(tmpdateoutput,"h",right("0" & hour(tmpdate),2))
tmpdateoutput = replace(tmpdateoutput,"m",right("0" & minute(tmpdate),2))
tmpdateoutput = replace(tmpdateoutput,"s",right("0" & second(tmpdate),2))
formatDBDate = tmpdateoutput
end function