dim data
data = date()
if rs("data") <> data then
Cn.Execute("UPDATE dati SET data =" & data & " WHERE id = " & rs("id"))
else
end if


se la data è diversa dalla data di oggi mi dovrebbe scrivere nel database la data di oggi, invece mi scrive dei numeri con il punto esempio 0.00.01

come mai?