vbscript组成员及；用户状态

是否有人知道如何使用vbscript查询本地组的成员并返回其状态（即启用或禁用）

我有以下信息来获得团体成员资格：

Set objNetwork = CreateObject("WScript.Network")
strComputer = objNetwork.ComputerName
strGroup = "Users"
Set objGroup = GetObject("WinNT://" & strComputer & "/" & strGroup & ",group")
For Each objMember In objGroup.Members
  WScript.Echo objMember.Name
Next

---

OS=Windows 2008

尝试以下操作：

For Each objMember In objGroup.Members
  If objMember.Class = "User" Then
    Set objUser = GetObject("WinNT://" & strComputer & "/" & objMember.Name)
    WScript.Echo objUser.Name & " [" & objUser.AccountDisabled & "]"
  Else
    WScript.Echo objMember.Name
  End If
Next