Lister tous les attributs d'un objet Active Directory
Je cherche à lister tout les attributs Active Directory d'une classe mais pour le moment, je n'arrive qu'à afficher les attributs principaux :
J'ai trouvé cette discussion mais elle n'est pas résolu
Voilà le code que j'utilise :
Code:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19
| Private Sub ListProperties(ByVal node As TreeNode, ByVal entry As System.DirectoryServices.DirectoryEntry)
Dim prop As PropertyValueCollection
Dim o As Object
Dim oneNode As String
Dim propertyNode As New TreeNode("Properties")
node.Nodes.Add(propertyNode)
For Each prop In entry.Properties
For Each o In prop
Try
oneNode = prop.PropertyName & ": " & o.ToString()
Catch
oneNode = prop.PropertyName & ": " & "No text representation."
End Try
propertyNode.Nodes.Add(New TreeNode(oneNode))
Next
Next
End Sub |
Je suis connecté en administrateur sur le serveur Active Directory, j'ai vérifié les droits et je crois que j'ai bien les droits de lecture d'attributs mais je n'arrive pas à lister les attributs cachés.