登陆页面常用判断方法

<!--#include file="conn.asp" -->
<%
if len(Server.Htmlencode(Request("admin")))>21 or len(Server.Htmlencode(Request("admin")))="" then call loginerr()
if len(Server.Htmlencode(Request("adminpass")))>21 or len(Server.Htmlencode(Request("admin")))="" then call loginerr()

Set rs=Server.CreateObject("ADODB.Recordset")
sql="select * from login where id=1"
rs.open sql,conn,1,1
if rs("admin")=Server.Htmlencode(Request("admin")) then
if rs("adminpass")=Server.Htmlencode(Request("adminpass")) then
   session("0dsj_diary")=Request("admin")
else
   call loginerr()
end if
else
call loginerr()
end if

call closeconn()

sub loginerr()
   response.write "<script language=javascript>alert('对不起,用户密码不正确,请重试!')</script>"
   response.write "<script language=javascript>history.back(-1);</script>"
   response.end
end sub

Response.write "<script language=javascript>alert('欢迎" & Request("admin") & "登陆!')</script>"
response.write "<br><br><br><br><br><br><br>"
response.write "<center style='font-size:9pt'>两秒自动转入日记页面,如不能转入请<a href='index.asp'>点击这里</a></center>"
%>
<meta http-equiv="refresh" content="1;URL='index.asp'">