ASP 连接Access数据库的登陆系统(2)
3、success.asp
没什么好说的,关键是看他是否有正常登陆标志,login的内容是否为ok,没有则将其弹出登陆页面
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>欢迎登陆</title> </head> <body> <% if Session.Contents("login")<>"ok" then %> <script> alert("请正常登陆!"); window.location.href = "login.html"; </script> <% else Response.Write("欢迎登陆,"+Session.Contents("username")) end if %> <a href="exit.asp">正常退出</a> </body> </html>
4、exit.asp退出处理页面
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%> <!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd"> <html xmlns="http://www.w3.org/1999/xhtml"> <head> <meta http-equiv="Content-Type" content="text/html; charset=utf-8" /> <title>正在退出...</title> </head> <body> <% '所有session立即超时,并且移除所有session Session.Abandon Session.Contents.RemoveAll() %> <script> window.location.href = "login.html"; </script> </body> </html>
以上就是本文的全部内容,希望对大家的学习有所帮助,也希望大家多多支持黑区网络。