Enumeration

Der Zugriff auf und die Bearbeitung von Daten mit ADSI bietet mehrere Beispiele für die-Enumeration. Sie können auch die untergeordneten Elemente von Container Objekten auflisten. Diese untergeordneten Elemente sind selbst Objekte und nicht nur Eigenschaften von Objekten.

Im folgenden Beispiel wird die IADsContainer -Schnittstelle verwendet, um die untergeordneten Elemente des Containers aufzuzählen.

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