Bonjour,
J'essaie de récupérer tous les utilisateurs d'une activeDirectory mais je ne récupére que les 1000 premières entrées/
Dim m_Root
As System.DirectoryServices.DirectoryEntry
Dim monEmplacementRecherche
As System.DirectoryServices.DirectoryEntry
Dim DirEntry
As DirectoryEntry
m_Root =
New DirectoryEntry(
[ldap://rootxxx LDAP://rootxxx])m_Domain =
New DirectoryEntry(
"LDAP://" +
DirectCast(m_Root.Properties(
"defaultNamingContext").Value,
String))
Dim searcher
As DirectorySearcher =
New DirectorySearcher(m_Domain)
searcher.Filter =
"(objectClass=user)"
searcher.SizeLimit = 5000
For
Each result
As SearchResult
In searcher.FindAll
DirEntry = result.GetDirectoryEntry
vNom = DirEntry.Properties(
"sn").Value
vPrenom = DirEntry.Properties(
"givenname").Value
Next
A quoi est du la limitation:
- la Active directory
- un paramètre de SearchResult
Si une personne a une réponse, je suis preneur