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

 更新时间:2006年11月16日 00:00:00   作者:  

<
'
读取用户输入的账号和密码.
UserID = Request(
"UserID")
Password = Request(
"Password")
'
检查UserIDPassword是否正确.
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]

相关文章

最新评论