Discussion :

[getpad]

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 :

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

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 ?

[Elwe31]

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

[28dev]

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.

[getpad]

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.