Access Database Logon Name through VBA 1

[joelindquist]

Hello,
I am using microsoft access 97 with a dedicated workgroup information file. I was wondering id there is any way to retrieve the Logon Name in VBA. It is a knowledge base software, and I'd like for access to automatically fill the userID class so that people will not have to continually enter their user ID when writing new solutions, and so that the field will always be set accurately to whoever submitted the article.

Thanks,
Joe Lindquist

 

[Maquis]

well, I've never worked with workgroups, but I usually grab the logon name with this routine. Hopefully it will work for you as well.

Function FIND_USER() As String

On Error GoTo ERR_FIND_USER
Dim UserParam$

UserParam$ = Environ("S_USER&quot
If UserParam$ = "" Then UserParam$ = Environ("USERNAME&quot
FIND_USER = UCase$(UserParam$)

EXIT_FIND_USER:
Exit Function

ERR_FIND_USER:
MsgBox Error$
Resume EXIT_FIND_USER
End Function Maq B-)
<insert witty signature here>

 

[joelindquist]

Worked Like a Charm,

Thanks Maq.

 

[joebickley]

will still work but you can still make life easier by using

currentuser() where ever u want the current database user to appear

 

[joelindquist]

joebickley-
That is what I was originally looking for, but Maq's idea returns their Windows Login ID, which is going to work even better.

Thanks, though.