Question

i 对VB.net非常新。可以使用美国广播公司的声明,将登机和搜索器称作以下。

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.Directory Servicess.DirectoryEntry and System.Directory servicess.DirectorySearcher 两者均继承<代码>System.Component Model.Component,执行。 IDisposable界面。因此,您可在一份使用声明()中使用这两种文字。为此,需要识别符号。



通常,如果在继承链条中没有哪一个类别实施,汇编者将产生错误。

更多信息:

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

友情链接