Bonjour a tous,
Je cherche désespérément à récuperer la liste des tous les "physicalDeliveryOfficeName" dans l'active directory de la société pour laquelle je travail, mais en vain. J'essaie avec le code suivant mais "results " contient toujours 0 résultat.
Quelqu'un pourrait-il m'éclairer ?
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20 Dim LDAP As New DirectoryEntry("LDAP://maldap") Dim searcher As DirectorySearcher = New DirectorySearcher(LDAP) searcher.PropertiesToLoad.Add("physicalDeliveryOfficeName") searcher.Filter = "(objectClass=physicalDeliveryOfficeName)" Dim results As System.DirectoryServices.SearchResultCollection Try results = searcher.FindAll() Catch ex As Exception Exit Sub End Try Dim result As System.DirectoryServices.SearchResult For Each result In results ' MsgBox(Trim(CStr(result.Properties("physicalDeliveryOfficeName") Next
Cordialement.
DeWaRs
Partager