[DllImport("netapi32.dll", SetLastError=true)]
static extern TODO NetWkstaUserGetInfo(TODO);
Declare Function NetWkstaUserGetInfo Lib "netapi32.dll" (ByVal reserved As String, ByVal level As Integer, ByRef lpBuffer As IntPtr) As Integer
None.
Do you know one? Please contribute it!
None.
Please add some!
Private Sub GetLoggedInUserInfo()
Dim lpBuffer As IntPtr
Dim result As Integer = NetWkstaUserGetInfo(Nothing, 1, lpBuffer)
If result = 0 Then
Dim wksInfo As WKSTA_USER_INFO_1 = Marshal.PtrToStructure(lpBuffer, GetType(WKSTA_USER_INFO_1))
''' Do something
NetApiBufferFree(lpBuffer)
End If
End Sub
Please add some more!