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

Registered : 107,407

HOME > ASP > ASP Forum > ขอโค้ดการใช้ Session กำหนดให้เข้าหน้า Page ตามแผนกของตนเอง VB.NET , MySQL





 

ขอโค้ดการใช้ Session กำหนดให้เข้าหน้า Page ตามแผนกของตนเอง VB.NET , MySQL

 



Topic : 102446



โพสกระทู้ ( 9 )
บทความ ( 0 )



สถานะออฟไลน์




คือผมกำลังทำโปรเจค เกี่ยวกับการจัดการเอกสาร Online
ต้องการให้ตอน Login เข้าสู่ระบบ ให้ตรวยสอบว่า login มาจากแผนกใด
แล้วให้เข้าไปที่หน้า page ของแผนกนั่นๆครับ
ผมลองหาตามบอร์ดบ้างแล้วครับ แต่ยังไม่ค่อยเข้าใจว่า จะเขียนยังไง
รบกวนช่วยแนะนำหน่อยนะครับ (มือใหม่)
ขอบคุณครับ

ASP.NET เขียนด้วย VB.NET ฐานข้อมูล MySQL

โค้ดหน้า login.aspx

<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="MySql.Data.MySqlClient"%>
<%@ Page Language="VB" %>
<script runat="server">
Dim objConn As New MySqlConnection
Dim objCmd As New MySqlCommand
Dim strConnString,strSQL As String

Sub btnLogin_Click(sender As Object, e As EventArgs)
Dim objConn As New MySqlConnection
Dim objCmd As New MySqlCommand
Dim strConnString, strSQL As String

strConnString = "Server=localhost;User Id=root; Password=137964285; Database=mydatabase; Pooling=false"
objConn.ConnectionString = strConnString
objConn.Open()

Dim intNumRows As Integer
strSQL = "SELECT COUNT(*) FROM member WHERE Username = '" & Me.txtUsername.Text & "' AND Password = '" & Me.txtPassword.Text & "' "
objCmd = New MySqlCommand(strSQL, objConn)
intNumRows = objCmd.ExecuteScalar()


IF intNumRows > 0 Then
Session("strUser") = Me.txtUsername.Text
Response.Redirect("testlogin.aspx")

Else
Me.pnlLogin.Visible = False
Me.lblStatus.Visible = True
Me.lblStatus.Text = "Username/Password is wrong."
End If

objConn.Close()
objConn = Nothing

End Sub

Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

End Sub
</script>
<html>
<head>
<title>ThaiCreate.Com Tutorial</title>
<style type="text/css">
.style1
{
height: 31px;
width: 88px;
}
.style3
{
height: 31px;
width: 208px;
}
.style5
{
height: 62px;
width: 88px;
}
.style6
{
height: 62px;
width: 208px;
}
.style7
{
height: 12px;
}
</style>
</head>
<body>
<form id="form1" runat="server">
<asp:Label id="lblStatus" runat="server" visible="False"
style="color: #FF0000; font-weight: 700; font-size: medium; text-align: center"></asp:Label>
&nbsp;
<table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td colspan="5"><img src="images/login/images/login_01.gif" width="804" height="136" /></td>
</tr>
<tr>
<td rowspan="3"><img src="images/login/images/login_02.gif" width="223" height="353" /></td>
<td rowspan="2"><img src="images/login/images/login_03.gif" width="20" height="299" /></td>
<td><img src="images/login/images/login_04.gif" width="333" height="75" /></td>
<td rowspan="2"><img src="images/login/images/login_05.gif" width="26" height="299" /></td>
<td rowspan="3"><img src="images/login/images/login_06.gif" width="202" height="353" /></td>
</tr>
<tr>
<td valign="top" background="images/login/images/login_07.gif">
<asp:Panel id="pnlLogin" runat="server" HorizontalAlign="Center" Width="275px">
&nbsp;&nbsp;&nbsp;&nbsp; <table border="0" style="width: 364px" align="center">
<tbody>
<tr>
<td class="style7" style="text-align: right" colspan="2">

</td>
</tr>
<tr>
<td class="style5" style="text-align: right">
&nbsp;<asp:Label ID="lblUsername" runat="server" text="Username"
ForeColor="White"></asp:Label>
</td>
<td class="style6">
&nbsp;<asp:TextBox ID="txtUsername" runat="server" Width="148px"></asp:TextBox>
<asp:RequiredFieldValidator ID="ChkUsername" runat="server"
ControlToValidate="txtUsername" ErrorMessage="*"></asp:RequiredFieldValidator>
</td>
</tr>
<tr>
<td class="style1" style="text-align: right">
&nbsp;<asp:Label id="lblPassword" runat="server" text="Password"
ForeColor="White"></asp:Label></td>
<td class="style3">
&nbsp;<asp:TextBox id="txtPassword" runat="server" Width="148px"
TextMode="Password"></asp:TextBox>
</td>
</tr>
</tbody>
</table>
<br />
&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
<asp:Button id="btnLogin" onclick="btnLogin_Click" runat="server" Text="Login"></asp:Button>
<br />
</asp:Panel>
</td>
</tr>
<tr>
<td><img src="images/login/images/login_08.gif" width="20" height="54" /></td>
<td><img src="images/login/images/login_09.gif" width="333" height="54" /></td>
<td><img src="images/login/images/login_10.gif" width="26" height="54" /></td>
</tr>
<tr>
<td colspan="5"><img src="images/login/images/login_11.gif" width="804" height="108" /></td>
</tr>
</table>
</form>
<p>
</p>
</body>
</html>



Tag : ASP, MySQL, Web (ASP.NET), VB.NET







Move To Hilight (Stock) 
Send To Friend.Bookmark.
Date : 2013-11-07 11:34:51 By : artn View : 1234 Reply : 1
 

 

No. 1



โพสกระทู้ ( 9 )
บทความ ( 0 )



สถานะออฟไลน์


Code (VB.NET)
<%@ Import Namespace="System.Data"%>
<%@ Import Namespace="MySql.Data.MySqlClient"%>
<%@ Page Language="VB" %>
<script runat="server">
    Dim objConn As New MySqlConnection
    Dim objCmd As New MySqlCommand
	Dim strConnString,strSQL As String
    
    Sub btnLogin_Click(sender As Object, e As EventArgs)  
        Dim objConn As New MySqlConnection
        Dim objCmd As New MySqlCommand
        Dim strConnString, strSQL As String

        strConnString = "Server=localhost;User Id=root; Password=137964285; Database=mydatabase; Pooling=false"
        objConn.ConnectionString = strConnString
        objConn.Open()

        Dim intNumRows As Integer
        strSQL = "SELECT COUNT(*) FROM member WHERE Username = '" & Me.txtUsername.Text & "' AND Password = '" & Me.txtPassword.Text & "' "
        objCmd = New MySqlCommand(strSQL, objConn)
        intNumRows = objCmd.ExecuteScalar()


		IF intNumRows > 0 Then
			Session("strUser") = Me.txtUsername.Text
            Response.Redirect("testlogin.aspx")
   
        Else
            Me.pnlLogin.Visible = False
            Me.lblStatus.Visible = True
            Me.lblStatus.Text = "Username/Password is wrong."
        End If

        objConn.Close()
        objConn = Nothing

    End Sub

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

    End Sub
</script>
<html>
<head>
    <title>ThaiCreate.Com Tutorial</title>
    <style type="text/css">
        .style1
        {
            height: 31px;
            width: 88px;
        }
        .style3
        {
            height: 31px;
            width: 208px;
        }
        .style5
        {
            height: 62px;
            width: 88px;
        }
        .style6
        {
            height: 62px;
            width: 208px;
        }
        .style7
        {
            height: 12px;
        }
    </style>
</head>
<body>
    <form id="form1" runat="server">
        <asp:Label id="lblStatus" runat="server" visible="False" 
            style="color: #FF0000; font-weight: 700; font-size: medium; text-align: center"></asp:Label>
    &nbsp;
    <table width="100" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td colspan="5"><img src="images/login/images/login_01.gif" width="804" height="136" /></td>
  </tr>
  <tr>
    <td rowspan="3"><img src="images/login/images/login_02.gif" width="223" height="353" /></td>
    <td rowspan="2"><img src="images/login/images/login_03.gif" width="20" height="299" /></td>
    <td><img src="images/login/images/login_04.gif" width="333" height="75" /></td>
    <td rowspan="2"><img src="images/login/images/login_05.gif" width="26" height="299" /></td>
    <td rowspan="3"><img src="images/login/images/login_06.gif" width="202" height="353" /></td>
  </tr>
  <tr>
    <td valign="top" background="images/login/images/login_07.gif">
        <asp:Panel id="pnlLogin" runat="server" HorizontalAlign="Center" Width="275px">
          &nbsp;&nbsp;&nbsp;&nbsp; <table border="0" style="width: 364px" align="center">
                <tbody>
                    <tr>
                        <td class="style7" style="text-align: right" colspan="2">
                            
                        </td>
                    </tr>
                    <tr>
                        <td class="style5" style="text-align: right">
                            &nbsp;<asp:Label ID="lblUsername" runat="server" text="Username" 
                                ForeColor="White"></asp:Label>
                        </td>
                        <td class="style6">
                            &nbsp;<asp:TextBox ID="txtUsername" runat="server" Width="148px"></asp:TextBox>
                            <asp:RequiredFieldValidator ID="ChkUsername" runat="server" 
                                ControlToValidate="txtUsername" ErrorMessage="*"></asp:RequiredFieldValidator>
                        </td>
                    </tr>
                    <tr>
                        <td class="style1" style="text-align: right">
                            &nbsp;<asp:Label id="lblPassword" runat="server" text="Password" 
                                ForeColor="White"></asp:Label></td>
                        <td class="style3">
                            &nbsp;<asp:TextBox id="txtPassword" runat="server" Width="148px" 
                                TextMode="Password"></asp:TextBox>
                        </td>
                    </tr>               
                </tbody>
            </table>
            <br />
                &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
            <asp:Button id="btnLogin" onclick="btnLogin_Click" runat="server" Text="Login"></asp:Button>
            <br />
        </asp:Panel>
        </td>
  </tr>
  <tr>
    <td><img src="images/login/images/login_08.gif" width="20" height="54" /></td>
    <td><img src="images/login/images/login_09.gif" width="333" height="54" /></td>
    <td><img src="images/login/images/login_10.gif" width="26" height="54" /></td>
  </tr>
  <tr>
    <td colspan="5"><img src="images/login/images/login_11.gif" width="804" height="108" /></td>
  </tr>
</table>
    </form>
    <p>
    </p>
</body>
</html>







แสดงความคิดเห็นโดยอ้างถึง ความคิดเห็นนี้
Date : 2013-11-07 11:38:11 By : artn
 

   

ค้นหาข้อมูล


   
 

แสดงความคิดเห็น
Re : ขอโค้ดการใช้ Session กำหนดให้เข้าหน้า Page ตามแผนกของตนเอง VB.NET , MySQL
 
 
รายละเอียด
 
ตัวหนา ตัวเอียง ตัวขีดเส้นใต้ ตัวมีขีดกลาง| ตัวเรืองแสง ตัวมีเงา ตัวอักษรวิ่ง| จัดย่อหน้าอิสระ จัดย่อหน้าชิดซ้าย จัดย่อหน้ากึ่งกลาง จัดย่อหน้าชิดขวา| เส้นขวาง| ขนาดตัวอักษร แบบตัวอักษร
ใส่แฟลช ใส่รูป ใส่ไฮเปอร์ลิ้งค์ ใส่อีเมล์ ใส่ลิ้งค์ FTP| ใส่แถวของตาราง ใส่คอลัมน์ตาราง| ตัวยก ตัวห้อย ตัวพิมพ์ดีด| ใส่โค้ด ใส่การอ้างถึงคำพูด| ใส่ลีสต์
smiley for :lol: smiley for :ken: smiley for :D smiley for :) smiley for ;) smiley for :eek: smiley for :geek: smiley for :roll: smiley for :erm: smiley for :cool: smiley for :blank: smiley for :idea: smiley for :ehh: smiley for :aargh: smiley for :evil:
Insert PHP Code
Insert ASP Code
Insert VB.NET Code Insert C#.NET Code Insert JavaScript Code Insert C#.NET Code
Insert Java Code
Insert Android Code
Insert Objective-C Code
Insert XML Code
Insert SQL Code
Insert Code
เพื่อความเรียบร้อยของข้อความ ควรจัดรูปแบบให้พอดีกับขนาดของหน้าจอ เพื่อง่ายต่อการอ่านและสบายตา และตรวจสอบภาษาไทยให้ถูกต้อง

อัพโหลดแทรกรูปภาพ

Notice

เพื่อความปลอดภัยของเว็บบอร์ด ไม่อนุญาติให้แทรก แท็ก [img]....[/img] โดยการอัพโหลดไฟล์รูปจากที่อื่น เช่นเว็บไซต์ ฟรีอัพโหลดต่าง ๆ
อัพโหลดแทรกรูปภาพ ให้ใช้บริการอัพโหลดไฟล์ของไทยครีเอท และตัดรูปภาพให้พอดีกับสกรีน เพื่อความโหลดเร็วและไฟล์ไม่ถูกลบทิ้ง

   
  เพื่อความปลอดภัยและการตรวจสอบ กระทู้ที่แทรกไฟล์อัพโหลดไฟล์จากที่อื่น อาจจะถูกลบทิ้ง
 
โดย
อีเมล์
บวกค่าให้ถูก
<= ตัวเลขฮินดูอารบิก เช่น 123 (หรือล็อกอินเข้าระบบสมาชิกเพื่อไม่ต้องกรอก)







Exchange: Voake, Comcube, รับทำเว็บไซต์ รับเขียนโปรแกรม

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