Thanh Nguyên Admin


Tổng số bài gửi : 526 Được Cảm Ơn : 59 Join date : 11/10/2012 Age : 25 Đến từ : Bà Rịa-Vũng Tàu
 | Tiêu đề: Xây Dựng Trang Login & Logout (VB.NET + Access database) Tue Feb 26, 2013 5:21 pm | |
|  | |  |  | Trong website có thể có những nơi chỉ dành cho các thành viên đã đăng ký mà không dành cho khách vãng lai, để truy cập những nơi này buộc thành viên phải đăng nhập vào website (login), các thành viên đã login sau đó có thể thoát (logout) .Việc ghi nhớ một thành viên đã login được lưu trong một biến kiểu session. Khi thành viên này logout chúng ta chỉ việc xóa biến session này. Module này gồm form login, file xử lý form login, file xử lý logout, database là table tblUser đã mô tả trong module Registration. LoginForm.htm: Form login LoginProcess.asp: xử lý form login, nếu login thành công thi redirect tới trangIndex.asp,nếu không thì quay lại form login. Index.asp: Trang chủ chỉ dành cho member đã login bằng cách kiểm tra biếnsession, nếu biến này rỗng (chưa login) thì từ chối truy cập và redirect đến form login Logout.asp: Trang xử lý logout bằng cách hủy session Trang LoginForm.html- Code:
<html> <head> <title>Login</title> </head> <body> <form method="POST" action="LoginProcess.asp"> <p> Username: <input type="text" name="username"></p> <p> Password: <input type="password" name="password"></p> <p><input type="submit" value="Submit" name=“submit"></p> </form> </body> </html>
Trang LoginProcess.asp- Code:
<!--#include file ="Connection.asp"--> <% username=request.form("username") password=request.form("password") openConn sql="select * from tblUser where username='"&username&"' and password='"&password&"'" set rs=server.createobject("adodb.recordset") rs.open sql,conn if not rs.eof then ‘login thành công session("username")=rs("username") rs.close destroyConn response.redirect "index.asp" else ‘login thất bại session("username")="" rs.close destroyConn response.redirect "LoginForm.html" end if %>
Trang Index.asp- Code:
<html> <head> <title>Home page for Member only</title> </head> <body> <% if session("username")="" then ‘kiểm tra người dùng đã login chưa? response.redirect "LoginForm.html" end if%> Welcome to <%=session("username")%>. This page is for Member only! <a href="Logout.asp"> Logout</a> </body> </html>
Trang Logout.asp- Code:
<%session.abandon ‘hủy session 'session("username")="“ %> <a href="LoginForm.html">Login</a> SinhvienIT | |  | |  |
_________________ Cộng Đồng It Vũng Tàu Kinh Nghiệm-Học Hỏi-Chia Sẻ [You must be registered and logged in to see this link.] |
|
hlong1994 Friend


Tổng số bài gửi : 1 Được Cảm Ơn : 0 Join date : 08/12/2014 Age : 23
 | Tiêu đề: Re: Xây Dựng Trang Login & Logout (VB.NET + Access database) Mon Dec 08, 2014 9:25 pm | |
| |
|