Format(Date,"mm/dd/yyyy") = 12/30/1899
Silly me, I was expecting 03/28/2022
Same thing if I
Dim dteDate as date
dteDate =Date()
msgbox format(dtedate, "mm/dd/yyyy")
12/30/1899
It's been a long day, but this one's "off the charts.
Maybe the clue is here:
"DateAdded" field in table Groupings is Date/Time. It's format is mm/dd/yyyyCode:strSql = "INSERT INTO Groupings(RegistryID,GroupID,GroupPhoneBroadcast,DateAdded)" strSql = strSql & " VALUES(" & numRegID & ", " & numGrpID & ", " & bolAutoBroadcast & ", " & Format(Date, "mm/dd/yyyy") & ");"