Bonjour,
Je voudrais récupérer la liste des utilisateurs actifs de l'Active Directory.
J'ai utilisé ce code pour charger la liste des users dans un combobox,
Ce code fonctionne, mais la liste retournée contienne tous les users (actifs et inactifs), alors que moi je voudrais récupérer seulement les utilisateurs actifs.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14 Dim Ldap As New System.DirectoryServices.DirectoryEntry("LDAP://NomServeurAD", "UserName", "Password") Dim searcher As System.DirectoryServices.DirectorySearcher = New System.DirectoryServices.DirectorySearcher(Ldap) searcher.Filter = "(objectClass=user)" Dim DirEntry As System.DirectoryServices.DirectoryEntry For Each result As System.DirectoryServices.SearchResult In searcher.FindAll DirEntry = result.GetDirectoryEntry Me.ComboBox1.Items.Add(DirEntry.Properties("SAMAccountName").Value.ToString) Next
Que dois-je ajouter dans le filtre pour éliminer les utilisateurs inactifs ?
Ou bien existe t'il une propriété qui retourne l'état de l'utilisateur ?
Je vous remercie d'avance pour votre aide.
Partager