Discussion :

[l0quito]

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?

[Danyel]

Juste à la lecture du code, je dirais normal car tu definis unMembre en tant qu'objet, puis tu fais la boucle ... unMembre est donc vide.

[l0quito]

Juste à la lecture du code, je dirais normal car tu definis unMembre en tant qu'objet, puis tu fais la boucle ... unMembre est donc vide.

oui, unMembre est vide..

Moi j'ai l'impression que j'ai mal donnée mon chemin LDAP, la je lui donne ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
"LDAP://192.168.77.86, login, mdp"

Quand exécute ça, il va me pointer le sommet de mon arborescence (EGS). Moi j'aimerai qu'il rentre dans le groupe "EGS_Users" .
Dois-je faire comme ça?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
LDAP://192.168.77.86/EGS_USERS, login, mdp