Discussion :

[richton95]

Bonjour

Débutant en VB, j'éssai d'afficher la liste des différents attributs utilisateur de l'AD (displayname, mail, givenname.....). Je souhaite seulement le nom des attributs. J'utilise la méthode FindONe. Mais avec le code suivant je me retrouve avec les mauvaise propriétés.
Merci pour votre aide

Code :

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

1
2
3
4
5
6
 
Dim searcher As DirectorySearcher = New DirectorySearcher(New DirectoryEntry("LDAP://....."))
        Dim res = searcher.FindOne()
        For Each prop In res.Properties.PropertyNames
            DropDownList1.Items.Add(prop.ToString)
        Next

[bizet]

Salut

je ne connais pas l'organisation de ton AD, mais j'ai l'impression que tu fais une recherche sur le premier noeud de ton AD.

Ce nœud correspond-il au point d'entré où se trouve tes users?

Sinon il faut que dans ta requete searcher, tu precises l'endroit ou se trouve tes utilisateurs.

Bon courage

[richton95]

Bonjour Bizet. Parles tu d'où pointe le Searcher ? ma déclaration est comme cela :

Code :

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

Dim searcher As DirectorySearcher = New DirectorySearcher(New DirectoryEntry("LDAP://OU=Users,OU=Paris Hub,DC=dom1,DC=dom2,DC=dom3,DC=com"))

Je pense bien pointer dans une OU de user pour ma recherche.

[bizet]

Salut

Il faut croire que tu n'es pas au bon endroit puisque tu ne récupère pas ce que tu veux.

Voila comment je fais pour me connecter a un noeud particulier :

Code :

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

1
2
3
4
 
 _deAccess = new DirectoryEntry(_sADAMCnxString + _node, _sADAMUserLogin, _sADAMUserPassword);
 
DirectorySearcher mySearch =   new DirectorySearcher(_deAccess, psQueryText);

et je mettrais

_node = OU=Users,OU=Paris Hub,DC=dom1,DC=dom2,DC=dom3,DC=com