Who Am I????
Our system is part of a Novel LAN... Is there any way to get the Novel LogonID from the system(a function like Now())? I thought at one time that I found a list of Windows variables that included things like windows version, and the network logonid...
Who is Participating?
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
All Courses
From novice to tech pro — start learning today.
network to get the user id.
Declare Function wu_WNetGetUser% Lib "USER.EXE" Alias "WNetGetUser" (ByVal szUser$, lpnBufferSize%)
Function NetworkUserID () As String
Dim szUser As String * 255
Dim lpnBufferSize As Integer
Dim status As Integer
lpnBufferSize = 255
status = wu_WNetGetUser(szUser, lpnBufferSize)
If (status = 3) Then
NetworkUserID = "WNetGetUser Failed"
Else
'Return up to first Null.
NetworkUserID = Left$(szUser, InStr(szUser, Chr(0)) - 1)
End If
End Function