枚举
使用 ADSI 访问并操作数据提供了几个枚举示例。 此外,还可枚举容器对象的子项。 这些子项本身便是对象,而不仅仅是对象的属性。
以下示例使用 IADsContainer 接口来枚举容器的子项。
Dim Container as IADsContainer
Dim Child as IADs
Set Container = GetObject("LDAP://MyServer/DC=MyDomain,DC=Fabrikam,DC=com")
For Each Child in Container
Debug.Print Child.Name
Next Child
反馈
https://aka.ms/ContentUserFeedback。
即将发布:在整个 2024 年,我们将逐步淘汰作为内容反馈机制的“GitHub 问题”,并将其取代为新的反馈系统。 有关详细信息,请参阅:提交和查看相关反馈