Ho provato con la seguente vba:
Option Compare Database
Private Sub Comando27_Click()
Dim criterio As String
Set db = CurrentDb
criterio = "INSERT INTO Accessi(DataO, Utente) "
criterio = criterio & "VALUES ('" & Now() & "', '" & Environ("Username") & "')"
db.Execute criterio
Close
End Sub
ma mi esce il user del pc, non il nome del utente che ha effettuato accesso..
dove sbaglio ??