Liste de tous les utilisateurs dans Active Directory
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:
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
