<%
' 读取用户输入的账号和密码.
UserID = Request("UserID")
Password = Request("Password")
' 检查UserID及Password是否正确.
If UserID <>"hrmis" Or Password <>
"password" Then
Response.Write "噢,您的口令错误!请重新输入."
Response.End
End If
' 将Session 对象设置为通过验证状态 .
Session("Passed") = True
%>

 

----------------------------------------------------------------------------------------------------------------

' 进入应用程序后,首先进行验证:
<%
' 如果未通过验证,返回Login状态.
If Not Session("Passed") Then
Response.Redirect "Login.asp"
End If
%>

----------------------------------------------------------------------------------------------------------------

[1]

标签:
|如何|何防|防止|止未|未经|经注|注册|册的|的用|用户|户绕|绕过|过注|注册|册界|界面|面直|直接|接进|进入|入应|应用|用系|系统|统?|?|

免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件! 如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
桃源资源网 Design By www.nqtax.com