admin.asp

功能强大的一个b/s工作站

<% @language="vbscript" %>
<% 
response.buffer=true
Response.Expires=0

f=request("admin_name")
p=request("admin_password")
If f="admin" and p="admin2000" Or session("sysop")=True then 
'密码正确,欢迎光临!
session("sysop")=True
else
session("sysop")=false
session("alert")="密码或账号不对，请重新输入用户名与密码！"
response.redirect "adminpass.asp" '密码或帐号不对,重新输入!
end if
response.redirect "view.asp"
%>