Register Register Member Login Member Login Member Login Forgot Password ??
PHP , ASP , ASP.NET, VB.NET, C#, Java , jQuery , Android , iOS , Windows Phone
 

Registered : 109,038

HOME > ASP.NET > ASP.NET Authentication > ASP.NET User Authentication Active Directory (AD)



Clound SSD Virtual Server

ASP.NET User Authentication Active Directory (AD)

ASP.NET User Authentication Active Directory (AD) การใช้งาน ASP.NET กับ Authentication ผ่าน AD หรือ Active Directory

Language Code : VB.NET || C#

Code (VB.NET)
01.<%@ Assembly Name="System.DirectoryServices, Version=1.0.3300.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"%>
02.<%@ Import Namespace="System.DirectoryServices"%>
03.<%@ Import Namespace="System.Security.Cryptography"%>
04.<%@ Import Namespace="System.Text"%>
05.<%@ Page Language="VB" %>
06.<script runat="server">
07.     
08.    Dim initLDAPPath = "dc=tc, dc=thaicreate, dc=com"
09.    Dim initLDAPServer = "192.168.0.5"
10.    Dim initShortDomainName = "tc"
11.    Dim strErrMsg
12. 
13.    Public Function MD5(ByVal strString As String) As String
14.        Dim ASCIIenc As New ASCIIEncoding
15.        Dim strReturn As String
16.        Dim ByteSourceText() As Byte = ASCIIenc.GetBytes(strString)
17.        Dim Md5Hash As New MD5CryptoServiceProvider
18.        Dim ByteHash() As Byte = Md5Hash.ComputeHash(ByteSourceText)
19. 
20.        strReturn = ""
21. 
22.        For Each b As Byte In ByteHash
23.            strReturn = strReturn & b.ToString("x2")
24.        Next
25. 
26.        Return strReturn
27. 
28.    End Function
29. 
30.    Sub Page_Load(sender As Object, e As EventArgs)
31.         
32. 
33.    End Sub
34. 
35.    Protected Sub btnLogin_Click(ByVal sender As Object, ByVal e As System.EventArgs)
36. 
37.        Dim DomainAndUsername As String = ""
38.        Dim strCommu As String
39.        Dim flgLogin As Boolean = False
40.        strCommu = "LDAP://" & initLDAPServer & "/" & initLDAPPath
41.        DomainAndUsername = initShortDomainName & "\" & txtUser.Text
42. 
43.        Dim entry As New DirectoryEntry(strCommu, DomainAndUsername, txtPwd.Text)
44.        Dim obj As Object
45. 
46.        Try
47. 
48.            obj = entry.NativeObject
49.            Dim search As New DirectorySearcher(entry)
50.            Dim result As SearchResult
51.            search.Filter = "(SAMAccountName=" + txtUser.Text + ")"
52.            search.PropertiesToLoad.Add("cn")
53.            result = search.FindOne()
54. 
55.            If result Is Nothing Then
56.                 flgLogin = False
57.                 strErrMsg = "Please check user/password"
58.            Else
59.                flgLogin = True
60.            End If
61. 
62.        Catch ex As Exception
63.              flgLogin = False
64.            strErrMsg = "Please check user/password"
65.        End Try
66.         
67. 
68.        IF flgLogin = True
69.            Me.lbDisplay.Text = "Welcome " & txtUser.Text
70.        Else
71.            Me.lbDisplay.Text = strErrMsg
72.        End IF
73.    End Sub
74.</script>
75. 
76.<html>
77.<head>
78.<title>ThaiCreate.Com AD/LDAP (Active Directory)</title>
79.</head>
80. <body>
81.    <form id="form1" runat="server">
82.        <asp:TextBox ID="txtUser" runat="server" Width="147px"></asp:TextBox>
83.        <asp:TextBox ID="txtPwd" runat="server" Width="147px" TextMode="Password"></asp:TextBox>
84.        <asp:Button ID="btnLogin" runat="server" Text="Login" OnClick="btnLogin_Click" />
85.        <br />
86.        <asp:Label ID="lbDisplay" runat="server"></asp:Label>
87.    </form>
88.</body>
89.</html>







   
Hate it
Don't like it
It's ok
Like it
Love it
Total Votes: 657Overall Rating: 3.8 / 5
Share


ช่วยกันสนับสนุนรักษาเว็บไซต์ความรู้แห่งนี้ไว้ด้วยการสนับสนุน Source Code 2.0 ของทีมงานไทยครีเอท


ลองใช้ค้นหาข้อมูล


   


Bookmark.   
       
  By : ThaiCreate.Com Team (บทความเป็นลิขสิทธิ์ของเว็บไทยครีเอทห้ามนำเผยแพร่ ณ เว็บไซต์อื่น ๆ)
  Score Rating :  
  Create/Update Date : 2008-10-31 06:44:02 / 2010-07-09 22:18:03
  Download : No files
 Sponsored Links / Related

 
ASP.NET User Authentication and Login
Rating :

 
ASP.NET User Register Form
Rating :

 
ASP.NET User Authentication/Login Form
Rating :


ThaiCreate.Com Forum


Comunity Forum Free Web Script
Jobs Freelance Free Uploads
Free Web Hosting Free Tools

สอน PHP ผ่าน Youtube ฟรี
สอน Android การเขียนโปรแกรม Android
สอน Windows Phone การเขียนโปรแกรม Windows Phone 7 และ 8
สอน iOS การเขียนโปรแกรม iPhone, iPad
สอน Java การเขียนโปรแกรม ภาษา Java
สอน Java GUI การเขียนโปรแกรม ภาษา Java GUI
สอน JSP การเขียนโปรแกรม ภาษา Java
สอน jQuery การเขียนโปรแกรม ภาษา jQuery
สอน .Net การเขียนโปรแกรม ภาษา .Net
Free Tutorial
สอน Google Maps Api
สอน Windows Service
สอน Entity Framework
สอน Android
สอน Java เขียน Java
Java GUI Swing
สอน JSP (Web App)
iOS (iPhone,iPad)
Windows Phone
Windows Azure
Windows Store
Laravel Framework
Yii PHP Framework
สอน jQuery
สอน jQuery กับ Ajax
สอน PHP OOP (Vdo)
Ajax Tutorials
SQL Tutorials
สอน SQL (Part 2)
JavaScript Tutorial
Javascript Tips
VBScript Tutorial
VBScript Validation
Microsoft Access
MySQL Tutorials
-- Stored Procedure
MariaDB Database
SQL Server Tutorial
SQL Server 2005
SQL Server 2008
SQL Server 2012
-- Stored Procedure
Oracle Database
-- Stored Procedure
SVN (Subversion)
แนวทางการทำ SEO
ปรับแต่งเว็บให้โหลดเร็ว


Hit Link
   







Load balance : Server 01
ThaiCreate.Com Logo
© www.ThaiCreate.Com. 2003-2025 All Rights Reserved.
ไทยครีเอทบริการ จัดทำดูแลแก้ไข Web Application ทุกรูปแบบ (PHP, .Net Application, VB.Net, C#)
[Conditions Privacy Statement] ติดต่อโฆษณา 081-987-6107 อัตราราคา คลิกที่นี่