Insert Value into Table

[burrina]

I need to insert the Environ(UserName into PCUserName field in tblUser

[HansV]

The following line will insert a new record in the table:

Code: Select all

CurrentDb.Execute "INSERT INTO tblUser (PCUserName) VALUES ('" & Environ("username") & "')", dbFailOnError

And this line will update the PCUserName field in the existing record(s):

Code: Select all

CurrentDb.Execute "UPDATE tblUser SET PCUserName='" & Environ("username") & "'", dbFailOnError

[burrina]

Thanks Hans. I'm hoping the rust comes off soon. Things I have forgotten how to do.
Appreciate it.