如何列出组的值的成员

问题描述

请注意！我不想找出某个组的用户/成员，但不想找出某个选定组所属的组。

我有一个被ADS接受为有效问题的查询：

"SELECT Name,distinguishedname,description,whenChanged,whenCreated,memberof FROM 'LDAP://" & SDomain &"' WHERE objectCategory = 'group' AND name ='" & group & "'"

但是，当我尝试读取存储在字符串（array？）“ memberof”中的值时，我做不到。在我们的许多情况下，这些值都是空值或单个值，有时甚至是多个值。而且该脚本在空脚本上出现错误。

    memberof=""
    numberOfMemberships=0
    memberships=oRS0.Fields("memberof")
    For each ADSgroup in memberships
        memberof= memberof & ADSgroup & ";" 
        numberOfMemberships=numberOfMemberships+1
    Next    

我收到“ Microsoft VBScript运行时错误'800a01c3'对象不是集合”

按行触发：

For each ADSgroup in memberships

你们中有人知道我在做什么错吗？

解决方法

是的，我已经找到了自己问题的答案。添加IsNull chek解决了该问题：

memberof=""
numberOfMemberships=0
memberships=oRS0.Fields("memberof")
if not IsNUll(memberships) then
    For each ADSgroup in memberships
       memberof= memberof & ADSgroup & ";" 
       numberOfMemberships=numberOfMemberships+1
    Next
end if 

还是谢谢。