Frage : VBA LDAP Frage zum Zurückholen alle Mitglieder einer Gruppe im aktiven Verzeichnis

Hallo können Experten,

I Notwendigkeit, alle Mitglieder einer Gruppe durch VBA in Excel.
I zurückzuholen finden, dass allen Benutzern mit dem Code attached.
But, das ich nur Benutzer nicht von einem bestimmten group.
I zurückholen kann, versucht haben, „memberOf='cn=SPC'" in hinzuzufügen, wo ist Klausel (SPC eine der vorhandenen Gruppe), aber ich erhalte kein records.
The AdsPath der Gruppe bin CN=SPC, OU=SPC, OU=Web (Aufstellungsort), OU=Applications, OU=Collaborations, DC=hq, DC=intra

Thanks
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
Const ADS_SCOPE_SUBTREE = 2

    objConnection = CreateObject („ADODB.Connection“) einstellen
    objCommand = CreateObject („ADODB.Command“) einstellen
    objConnection.Provider = „ADsDSOObject“
    objConnection.Open „aktiver Verzeichnis-Versorger“
    Einstellen objCommand.ActiveConnection = objConnection
    objCommand.CommandText = „AUSERWÄHLTE Post, sAMAccountName, displayName, showInAddressBook, ADsPath VON „LDAP: //ou=Organisations, dc=HQ, dc=intra“ WO objectCategory='user'"
    objCommand.Properties („Seiten-Größe“) = 2000
    objCommand.Properties („Art auf“) = „displayName“
    objRecordSet = objCommand.Execute einstellen

Antwort : VBA LDAP Frage zum Zurückholen alle Mitglieder einer Gruppe im aktiven Verzeichnis

Weitere Lösungen  
 
programming4us programming4us