Reading Active Directory by VB.NET Source code...

Emc2 · 2014-01-18T05:45:32+00:00

''' ''' This is the friend class which used to manage daomain login. ''' ''' Friend Class LoginManager Friend Shared Function Authentification(ByVal username As String, ByVal pwd As String) As Boolean Dim entry As New DirectoryEntry("LDAP://" & Environment.UserDomainName, username, pwd) Dim obj As Object Try obj = entry.NativeObject Dim search As New DirectorySearcher(entry) Dim result As SearchResult search.Filter = "(SAMAccountName=" + username + ")" search.PropertiesToLoad.Add("cn") result = search.FindOne() If result Is Nothing Then Return False End If Catch ex As Exception Return False End Try Return True End Function End Class

Thread starter Emc2
Start date Jan 18, 2014

Emc2

JamiiForums uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.

Accept Learn more…

Back

Top Bottom

Forums

New posts

Reading Active Directory by VB.NET Source code...

Emc2

JF-Expert Member

Our Community

Regional Communities