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...
ronallardAsked:
Who is Participating?
 
DennisHConnect With a Mentor Commented:
We use this function in an Access 2.0 app running on a novell
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

0
 
ronallardAuthor Commented:
Works great! Thanks alot...
0
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.