Bonjour!!

Le but de mon application est de se connecter a l'AD et aller chercher tout les utilisateur d'un groupe.
j'ai fait plusieurs recherche et j'ai trouver ça : (dans le cours vb & AD)
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
 
Public Function listeMembresGroupe(ByVal cheminLdapGroupe As String, _
ByVal monUsername As String, _
ByVal monPassword As String) As ArrayList
' Instanciation de la liste qui va contenir le résulat
Dim maListeMembres As New ArrayList
Try
' Groupe dont les membres sont à lister
Dim monGroupe As New DirectoryEntry("LDAP://" & cheminLdapGroupe, _
monUsername, monPassword, AuthenticationTypes.Secure)
Dim unMembre As New Object()
' Ajoute chaque membre trouvé à notre ArrayList à retourner
For Each unMembre In monGroupe.Properties("member")
maListeMembres.Add(unMembre.ToString)
Next
monGroupe.Close()
Catch ex As Exception
MessageBox.Show(ex.Message)
End Try
' Retourne la liste des membres du groupe
Return maListeMembres
End Function
Mon problème c'est que je ne comprend pas comment lui donner le nom de mon groupe, car à l'exécution, la variables "monGroupe" contient :
Name : Dc = "EGS" (Nom de mon Group)
Path : LDAP://192.168.77.86 (ID Serveur)
UserName: Ivan

Le problème est qu'il ne passe pas dans ma boucle...
Quelqu'un connait-il une solution?