ma access penso digerisca l'inglese
codice:
Function FormatDateTimeLCID (str, nNamedFormat, nLCID)
dim strRet, nOldLCID
strRet = str
If (nLCID > -1) Then nOldLCID = Session.LCID
On Error Resume Next
If (nLCID > -1) Then Session.LCID = nLCID
If ((nLCID < 0) Or (Session.LCID = nLCID)) Then strRet = FormatDateTime(str, nNamedFormat)
If (nLCID > -1) Then Session.LCID = nOldLCID
FormatDateTimeLCID = strRet
End Function
differenza = dateadd("n", -15, now())
strSQL = "DELETE FROM Utenti_connessi WHERE Data_connessione < #" & FormatDateTimeLCID(differenza,1033) & "#"
1033 LCID inglese
1040 italiano