Connexion Active Directory en dynamique - VB/VBA/VBS - Programmation
MarshPosté le 23-12-2005 à 11:58:03
Bonjour,
J'ai un soucis qui va vous paraître surement très simple à résoudre:
Je cherche à exporter les Users AD vers Excel, jusque là tt est ok, seulement dans le script je mets le chemin LDAP donc c'est pas du dynamique ....
"SELECT givenName, SN, samAccountName, department, telephoneNumber, mail, userPrincipalName, distinguishedName, homeDirectory, homeDrive, canonicalName, scriptPath, userAccountControl FROM " _ & "'LDAP://dc=AAA,dc=BBB,dc=fr' WHERE " _ & "objectCategory='person' AND objectClass='user' ORDER BY samAccountName"
J'ai déclarer Dim objRootDSE = GetObject("LDAP://rootDSE" ), mais je ne sais pas comment reformuler ma requete pour que çà fonctionne, j'ai essayé pas mal de choses du style:
"LDAP://" & objRootDSE.Get à la place de 'LDAP://dc=AAA,dc=BBB,dc=fr' mais çà ne marche pas ;-(
Marsh Posté le 23-12-2005 à 11:58:03
Bonjour,
J'ai un soucis qui va vous paraître surement très simple à résoudre:
Je cherche à exporter les Users AD vers Excel, jusque là tt est ok, seulement dans le script je mets le chemin LDAP donc c'est pas du dynamique ....
"SELECT givenName, SN, samAccountName, department, telephoneNumber, mail, userPrincipalName, distinguishedName, homeDirectory, homeDrive, canonicalName, scriptPath, userAccountControl FROM " _
& "'LDAP://dc=AAA,dc=BBB,dc=fr' WHERE " _
& "objectCategory='person' AND objectClass='user' ORDER BY samAccountName"
J'ai déclarer
Dim objRootDSE = GetObject("LDAP://rootDSE" ), mais je ne sais pas comment reformuler ma requete pour que çà fonctionne, j'ai essayé pas mal de choses du style:
"LDAP://" & objRootDSE.Get à la place de 'LDAP://dc=AAA,dc=BBB,dc=fr' mais çà ne marche pas ;-(
Comme je débute tout juste, je galère quoi ;-(
Merci de votre aide
---------------
David.