Note this codes about 6 years old as of 2014 – I’m sure there are better ways of doing this now but this worked at the time and is still live in one of my projects.<\/p>\n
I needed to identify the currently logged on user running my application to make an audit file and also show only user options that the logged on user was setup for.<\/p>\n
Here’s the code…<\/p>\n
\r\nDeclare Function GetUserName Lib "advapi32.dll" Alias _\r\n"GetUserNameA" (ByVal lpBuffer As String, _\r\nByRef nSize As Integer) As Integer\r\n\r\n Public Function GetUserName() As String\r\n 'Gets currently logged on user - username\r\n Dim iReturn As Integer\r\n Dim userName As String\r\n 'put the username in a string limit 50 chars\r\n userName = New String(CChar(" "), 50)\r\n 'put the length of the username in an Integer iReturn\r\n iReturn = GetUserName(userName, 50)\r\n 'Tidy up various formatting if required with the replace function like remove the .\r\n userName = userName.Replace("."c, " "c)\r\n \r\n 'Return the username back\r\n GetUserName = userName.Substring(0, userName.IndexOf(Chr(0)))\r\n\r\n End Function\r\n<\/pre>\n","protected":false},"excerpt":{"rendered":"Note this codes about 6 years old as of 2014 – I’m sure there are better ways of doing this now but this worked at the time and is still live in one of my projects. I needed to identify the currently logged on user running my application to make an audit file and also … Continue reading Get Current logged on Username – vb.net – using advapi32.dll<\/span>