Utilisation VB et Active Directory

Bonjour,

J'ai suivi l'article sur l'utilisation d'Active Directory avec VB.NET et donc j'ai testé ce qui était dit, à savoir :

Code:

---

1 2 3 4 5 6 7

Try   Dim Ldap As DirectoryEntry = new DirectoryEntry("LDAP://votre-nom-AD", "Login", "Password")   Catch Ex As Exception MessageBox.Show(Ex.Message) End Try

---

Le problème est que même si je mets n'importe quoi dans DirectoryEntry aucune exception n'est levé.
Que dois-je changer ?

Et si tu "test Ldap is nothing" ???

Il me semble que tu ne fais que créer un object DirectoryEntry.
Ce n'est qu'au moment ou tu va exécuter une opération distante que l'exeption intervient si tu as mis n'importe quoi.

Lance par exemple une recherche avec DirectorySearcher.

Effectivement ce n'est qu'au moment du .FindOne que cela plante est passe dans l'exception.

Maintenant j'ai un autre problème c'est qu'apparemment je n'arrive pas à me connecter avec le new DirectoryEntry puisqu'en mettant les bonnes infos (LDAP,Utilisateur,MDP) et en faisant un filtre par .filter = "(SAMAccountName=Utilisateur)"

mon FindOne plante à chaque fois. :?