January 1, 2005

WinTask - GetUserName

'
' GetUserName
'
' Author: Joe Strazzere
'

Name$="                                                                                       "
Delim$=Chr$(255)
External$("advapi32","GetUserNameA",Name$,Delim$)
msgbox("The User Name of the person logged on is "+Name$,,"GetUserName")