[VBA-E] Connexion Active Directory

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

Salut,

Je pense que tu devrais mettre ton chemin dans un fichier (.txt) par exemple, tu le lis au démarrage, et tu affecte cette valeur à une variables String, que tu utilises ensuite. Ainsi si ton chemin change, tu n'as qu'à réactualisé ton fichier txt.


Starec

OK Merci je vais tester çà ;-)