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

NEWSZW_HZH_BEGIN-->

< ％
' 读取用户输入的账号和密码 .
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]