[]Active directory prenom,nom et mail user
salut tout le monde
je liste les utilisateurs membres d'un groupe de securité sur active directory
voici mon code :
Code:
1
2
3
4
5
6
7
8
9
| Set colGroups = GetObject("WinNT://"&Application("Serveur")&"")
colGroups.Filter = Array("group")
For Each objGroup In colGroups
if objGroup.Name = "GloEparc" then
For Each objUser in objGroup.Members
msgbox objUser.name
Next
end if
Next |
mais le probleme c'est que ce script me renvoit kune seule infromations sur les user : son login
ex : il me retourne "Philippe"
alors que je voudrais avoir le prenom, le nom et le mail
j'ai le script qui permet cela mais je n'arrive pas à les lier :
Code:
1
2
3
4
5
6
7
| Set objUser = GetObject _
("LDAP://cn=philippe dumont,ou=utilisateurs,dc=toto,dc=tata")
msgbox "User Principal Name: " & objUser.userPrincipalName
msgbox "user displayname : " & objUser.displayName
msgbox "SAM Account Name : " & objUser.sAMAccountName
msgbox "mail : " & objUser.mail |
si kkun a un tuyau ca serait cool 8)
merci @+
