How can I grab the Login Computer UserName from a Windows 2000 Computer? I need to get this and place it into a variable, so that I can write this to the registry.
Any code that will show me to do this would be great.
' Makes sure all variables are dimensioned in each subroutine.
Option Explicit
' Access the GetUserNameA function in advapi32.dll and
' call the function GetUserName.
Declare Function GetUserName Lib "advapi32.dll" Alias "GetUserNameA" _
(ByVal lpBuffer As String, nSize As Long) As Long
Then copy This Bit Where Ever You Want It:
Code:
Dim lpBuff As String * 25
Dim ret As Long, UserName As String
' Get the user name minus any trailing spaces found in the name.
ret = GetUserName(lpBuff, 25)
UserName = Left(lpBuff, InStr(lpBuff, Chr(0)) - 1)
A code module that provides three functions for getting the account name of the currently logged on user and the computer network name of the machine your application is running on.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.