Bonjour à tous,

je cherche à faire un script permettant de listes tous les utilisateurs présents dans Active Directory.
J'ai déjà écrit un script mais il faut scpécifier un OU précise, comment peut on faire pour que le script recherche lui même dans toutes les OU ?

Voici le script que j'ai écrit :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
Set CNUsers = GetObject ("LDAP://OU=Utilisateurs,OU=MASOCIETE,DC=masociete,DC=com")
CNUsers.Filter = Array("user")
For Each User in CNUsers
     TUser = User.DisplayName 
 
set AddressEntry = Session.AddressBook.GAL.ResolveName(TUser)
wscript.echo " Users are : " & AddressEntry.Name "
 
next

J'ai en fait surtout besoin des utilisateurs présent dans Exchange (cad, ceux ayant une boîte aux lettres). Est-il plus simple de récupérer directement les utilisateurs depuis Exchange ?

Merci d'avance pour vos réponses.

Cordialement,

Damien