Quote Originariamente inviata da devil946 Visualizza il messaggio
'RECUPERO I DATI DAL RECORDSET
dataitaliaStart = Format(rstDati.Fields("DataAppuntamento").Value, "dd/mm/yyyy")
' ........
' FORMATTO LA DATA IN TIPOLOGIA AMERICANA

MeseItalia = Mid(dataitaliaStart, 4, 2)
GiornoItalia = Mid(dataitaliaStart, 1, 2)
AnnoItalia = Right(dataitaliaStart, 4)
dataamerica = MeseItalia & "/" & GiornoItalia & "/" & AnnoItalia
Premesso che dovresti farti spostare in Windows e Soft

Tu generi una data italiana per trasformarla poi in americana .....
Perché non la generi subito in formato americano ????

dataamerica = Format(rstDati.Fields("DataAppuntamento").Value, "mm/dd/yyyy")


Facci sapere,
e se non risolvi riposta in Windows e Soft

.