Dim originalObj As System.DirectoryServices.DirectoryEntry originalObj = TryCast(result.GetDirectoryEntry(), System.DirectoryServices.DirectoryEntry) Dim originalProp As String Dim value As String For Each originalProp In originalObj.Properties.PropertyNames resultRow = resultTable.NewRow() value = originalObj.Properties(originalProp)(0).ToString() resultRow("Name") = originalProp resultRow("Details") = ??? resultTable.Rows.Add(resultRow) Next
var
This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)