在vb.net中使用语句进行目录搜索或Ldap功能

Question

我是VB.net的新手。 我可以使用USING语句调用目录条目和搜索器，如下所示。

Using entry As DirectoryEntry = New DirectoryEntry(String.Format("LDAP://xxx.com.my"))
        entry.AuthenticationType = AuthenticationTypes.Delegation
        entry.Username = username
        entry.Password = password

        Using searcher As New DirectorySearcher(entry)
            searcher.SearchScope = SearchScope.OneLevel
            Try
                Dim results As SearchResult = searcher.FindOne

                success = Not (results Is Nothing)
            Catch ex As Exception
                success = False
                WriteToFile("ValidateADLogin error : " & ex.Message)
            End Try
        End Using
    End Using

Answer 1

System.DirectoryServices.DirectoryEntry和System.DirectoryServices.DirectorySearcher都继承自System.ComponentModel.Component ，后者实现了IDisposable接口。 所以是的，您可以在Using语句中使用它们两者（为此需要IDisposable ）。

通常，如果继承链中没有类实现IDisposable则编译器将发出错误。

更多信息：

http://msdn.microsoft.com/en-us/library/system.directoryservices.directoryentry.aspx http://msdn.microsoft.com/en-us/library/system.directoryservices.directorysearcher