How do I get the username of local computer?

[BigRedTexas]

I'm trying to append my username I'm logged on to my computer as onto a build version. How can I retrieve that via VB.NET?

Thanks, Scott

 

[olichap]

I'm not sure if .NET exposes this API call in a namespace so here's the delaration:

Declare Function GetUserName Lib "advapi32.dll" Alias _
"GetUserNameA" (ByVal lpBuffer As String, nSize As Long) As Long

Public Sub Main()
Dim lLong As Long
Dim lLong2 As Long
lLong = 255
sCurrentUser = Space(lLong)
lLong2 = GetUserName(sCurrentUser, lLong)
sCurrentUser = RTrim(sCurrentUser)
end sub

 

[krisbrixon]

This is not exaclty what you want, but to get the machine name you use:

Dim sMachName As String = Environment.MachineName.ToString

Kris

 

[imjbhowe]

Try
dim username as string

username = security.Principal.WindowsIdentity.GetCurrent.Name

with Imports System.Security

 

[woyler]

This will give you the name without the domain

MyUserName=System.Windows.Forms.SystemInformation.UserName