Discussion :

[olivier1212]

Bonjour,
j'essaye de creer un prog avec visual studio 2005 pour rechercher des utilisateurs dans un groupe, mais apparemment je n'arrive pas à rentrer dans la boucle. Je n'ai aucun message d'erreur. Merci pour votre aide.

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
23
24
25
26
 
Dim MonCpt As String = CStr(TextBox1.Text)
        Dim MonPass As String = CStr(TextBox2.Text)
        Dim MonCheminLDAP As String = "cn=...,ou=...,dc=..."
        Dim MonEntree As New DirectoryEntry("LDAP://" & MonCheminLDAP,    MonCpt, MonPass, AuthenticationTypes.Secure)
        Dim Chercher As DirectorySearcher = New DirectorySearcher(MonEntree)
        Chercher.Filter = "(ObjectClass=user)"
 
        Dim Fichier As New StreamWriter("c:\MonFichier.txt")
        Dim DirEntree As DirectoryEntry
        For Each resultat As SearchResult In Chercher.FindAll
            'On récupère l'entrée trouvée lors de la recherche
            DirEntree = resultat.GetDirectoryEntry
            Fichier.WriteLine("Login : " + DirEntree.Properties("SAMAccountName").Value)
            'On peut maintenant afficher les informations désirées
            Fichier.WriteLine("Login : " + DirEntree.Properties("SAMAccountName").Value)
            Fichier.WriteLine("Nom : " + DirEntree.Properties("sn").Value)
            Fichier.WriteLine("Prénom : " + DirEntree.Properties("givenName").Value)
            Fichier.WriteLine("Email : " + DirEntree.Properties("mail").Value)
            Fichier.WriteLine("Tél : " + DirEntree.Properties("TelephoneNumber").Value)
            Fichier.WriteLine("Description : " + DirEntree.Properties("description").Value)
 
            Console.WriteLine("-------------------")
        Next
        MonEntree.Close()
        Fichier.Close()

[LooserBoy]

Si tu ne rentre pas dans la boucle, c'est que tu n'as aucun résultat.
Es-tu sûr de la validité de ta chaine de connexion LDAP et que tu consultes bien le bon catalogue du LDAP?
J'ai un code strictement équivalent au tient en C# et les seuls problèmes que j'ai eu lors de la mise au point a été d'aller regarder les bonnes listes.

[olivier1212]

J'ai essayé avec d'autres chemins c'est pareil.
J'ai aussi essayé sans collection, juste en allant chercher un unique utilisateur et la ca marche.
Le problème viendrait-il du serveur qui est en windows 2000?

[LooserBoy]

Ca m'étonnerait mais on ne sait jamais avec M$...
Je vais regarder si j'ai la possibilité de tester sur un serveur Win2000...