salut tout le monde

je liste les utilisateurs membres d'un groupe de securité sur active directory

voici mon code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
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 : Sélectionner tout - Visualiser dans une fenêtre à part
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 @+