コンピュータのユーザー名を取得するには、WshNetwork オブジェクトの UserName プロパティを利用することができます。
この例では、現在のコンピュータのユーザー名を取得して表示します。
WshNetwork = new ActiveXObject( "WScript.Network" );
alert( "User Name = " + WshNetwork.UserName );
Set WshNetwork = CreateObject( "WScript.Network" )
alert "User Name = " & WshNetwork.UserName
Microsoft MSDN ライブラリ: UserName プロパティ