|
|
Imports System Imports System.Security Public Module modmain Sub Main() 'KPD-Team 2001 'URL: http://www.allapi.net/dotnet/ 'E-Mail: KPDTeam@Allapi.net Console.WriteLine("Current username: " & Principal.WindowsIdentity.GetCurrent.Name) End Sub End Module |