VBS脚本显示域用户和本地用户

strComputer = CreateObject("WSCRIPT.NETWORK").ComputerName
strTestString = "/" & strComputer & "/"

Set colGroups = GetObject("WinNT://" & strComputer & "/Administrators")

For Each objUser In colGroups.Members
    If InStr(objUser.AdsPath, strTestString) Then
        Wscript.Echo "Local user: " & objUser.Name
  'wscript.echo objUser.AdsPath
    Else
        Wscript.Echo "Domain user: " & objUser.Name
    End If
Next