Code:
Function fOSUserName() As String
On Error GoTo fOSUserName_Err
fOSUserName = Environ("Username") ' of vba.environ("Username")
Environ ("Username")
fOSUserName_Exit:
Exit Function
fOSUserName_Err:
MsgBox Error$
Resume fOSUserName_Exit
End Function
Above mentioned code i use to retrieve the username from the network and use this username to specify information when retrieving information from a database.
What is my problem?
Well....on some network-clients this retrieving works perfectly the username is retrieved correctly and put into the table,
but on other network-clients (also tried logging in as myself on both mentioned network-clients) i get an error on the 4th line (
Code:
fOSUserName = Environ("Username")
Please advise what could be the issue here?
