适用环境:Windows 2000/XP/2003 ,其中 administrator 为用户名,officeu 为机器名。
strComputer = "."
Set objWMIService = GetObject("winmgmts:\" & strComputer & "rootcimv2")
Set objAccount = objWMIService.Get _
("Win32_UserAccount.Name='administrator',Domain='officeu'")
Wscript.Echo objAccount.SID