Discussion :

[wwwsfax]

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,

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

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.
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.

[wwwsfax]

Bonjour,

Je reformule mon problème : je voudrais récupérer la liste des utilisateurs actifs de l'Active Directory.
La liaison avec l’Active directory fonctionne correctement (avec le code cité dans le 1er poste), sauf que la liste retournée contienne tous les utilisateurs de l’active directory (actifs et incatifs).
Que dois-je ajouter dans le filtre pour éliminer les utilisateurs inactifs (dont la propriété "le compte est désactivé" de l’AD, est cochée) ?

Je vous remercie d’avance pour votre aide.

[jlm22]

Salut,
Les utilisateur qui ont un compte désactivé ont la propriété userAccountControl à "66050" ou "546" ou "514" tout les autres numéros sont des comptes actifs