Dim u As DirectoryServices.DirectoryEntry = Get_UNIX_root("ou=netgroup,")
Dim un As String = "user-tplp-support"
Dim s As New DirectoryServices.DirectorySearcher(u, "(nisNetgroupTriple=(," + un + ",))")
Dim r As DirectoryServices.SearchResultCollection = s.FindAll
Catch ex As Exception
Return ex.ToString
End Try
is throwing exception at FindAll
System.Runtime.InteropServices.COMException (0x8007203A): The server is not operational.
at System.DirectoryServices.DirectoryEntry.Bind(Boolean throwIfFail)
at System.DirectoryServices.DirectoryEntry.Bind()
at System.DirectoryServices.DirectoryEntry.get_AdsObject()
at System.DirectoryServices.DirectorySearcher.FindAll(Boolean findMoreThanOne)
at DynScripts.scripts.Sample()
Any recommendations?