SID文字列のうち先頭の「S-1-」はハードコーディングしている(この「1」がどこから取得するか不明のため) その次の番号は「0」「1」「2」「3」「5」のみ対応。それ以外の場合は、「x」と表示される。 |
Option Explicit Dim Obj Set Obj = WScript.CreateObject("SEtcDispCOM.Warpper.1") str = obj.GetUserName WScript.Echo "UserName = " & str Set Obj = Nothing |