cklogin.asp

来自「上海数字留言簿系统2.1版 软件语言： 简体中文 授权方式： 免费版 」· ASP 代码 · 共 23 行

<!--#include file="conn.asp"-->
<%
 admin=request("admin")
  if admin="" then
 response.write"<SCRIPT language=JavaScript>alert('用户名不能为空！');"
 response.write"javascript:history.go(-1)</SCRIPT>"
  response.end
  end if
%>
<%
 set rs=server.createobject("adodb.recordset")
 sql="select * from admin where admin='"&admin&"' and password='"&request("password")&"'"
rs.open sql,db,3,2
 if rs.eof then
%>
<%
  response.redirect "login.asp"
 else
  session("admin")="smallstick"
  response.redirect "index.asp"
end if
%>