check.asp
<%
select case 你的条件
case 条件1
session("check")="checka"
response.redirect "a.asp"
case 条件2
session("check")="checkb"
response.redirect "b.asp"
case 条件3
session("check")="checkc"
response.redirect "c.asp"
case else
response.write "非法操作"
end select
%>
a.asp
<%
if session("check")<>"checka" then
response.redirect "default.asp"
response.end
else
你的程序
end if
用户登陆时验证成功,将用户名存入session里,
sql="select * from a where username='"&request("username")&" and password="&request("password")
rs.execute(sql)
if rs.eof or rs.bof then //验证失败,转回登陆页面
aa=“输入不正确"
response.redirect "login.asp?aa='"&aa&"'"
else
response.redirect "success.asp"//验证成功转向成功页面
session("username")=rs("username")//将用户名存入session("username")里
end if
然后在需要防止用户直接登陆的页面最前面写入:
if session("username")=="" then
response.write "请先登陆或session超时"
end if