environ() in RUNSQL command causing glitch

[techsupport3977]

Most of my forms use the below RUNSQL command to log what data they are viewing in order for me to serve them better. My concern is the "environ('username')". About 1% of the log table show the user name as blank whne the user has a domain account and is currently logged in the domain. What are the possibilities that can be causing this and how do I fix this? The inability of MsAccess to determine who is logged into the Db also causes a 1% "LOGON FAILURE" to forms because of security rights.

DoCmd.SetWarnings False
DoCmd.RunSQL " INSERT INTO LOG_REPORT ( [DATE], [USER], HOST ,TASK, DB )" & _
"SELECT now() AS [DATE], environ('username') AS [USER], environ('computername') AS HOST ,'" & Me.Name & "','" & CurrentDb.Name & "'"
DoCmd.SetWarnings True

 

[JerryKlmns]

CurrentUser returns the UserId logged on the database

But this should work

DoCmd.RunSQL "INSERT INTO LOG_REPORT ( [DATE], [USER], HOST ,TASK, DB )" & _
"Select " & format(Date(), "yyyy-mm-dd") & ", '" & environ("username")& "', '" & environ("computername") & "', '" & Me.Name & "', '" & CurrentDb.Name & "';"

 

[PHV]

You may also try this:

DoCmd.RunSQL "INSERT INTO LOG_REPORT ([DATE], [USER], HOST ,TASK, DB)" & _
"VALUES (#" & Now() & "#,'" & Environ("username") & "','" & Environ("computername") & "','" & Me.Name & "','" & CurrentDb.Name & "')"

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886