枚举对象
若要查看容器的子对象(例如组织单位 (OU)),则应枚举容器对象。 为了模拟文件系统,子对象将对应于目录中的文件,而容器(即父对象)将对应于目录自身。 如果要获取某一对象的父对象,还可使用枚举操作。
枚举对象时,实际是绑定到目录中的某一对象,并对每个对象返回 IADs 接口。
以下代码示例演示了如何枚举容器的子项。
Dim ou As IADs
' Bind to an object using its DN.
On Error GoTo Cleanup
Set ou = GetObject("LDAP://OU=Sales,DC=Fabrikam,DC=COM")
For each child in ou
Debug.Print child.Name
Next
Cleanup:
If (Err.Number<>0) Then
MsgBox("An error has occurred. " & Err.Number)
End If
Set ou = Nothing
可筛选枚举返回的对象类型。 例如,若要仅显示用户和组,请在枚举前使用以下代码示例。
Ou.Filter = Array("user", "group")
如果有对象引用,则可使用 IADsParent 属性来获取该对象的父项。 以下代码示例演示了如何绑定到父对象。
parentPath = obj.Parent
Set parent = GetObject(parentPath)
有关详细信息,请参阅枚举 ADSI 对象。
相关主题
反馈
https://aka.ms/ContentUserFeedback。
即将推出:在整个 2024 年,我们将逐步取消以“GitHub 问题”作为内容的反馈机制,并将其替换为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈