www.gusucode.com > 芝麻屋小小留言本 2.0码程序 > admin/check.asp

    <!--#include file="conn.asp" -->
<%
name=request("name")
exec="select * from admin where name='"+name+"'"
set rs=server.CreateObject("adodb.Recordset")
rs.open exec,conn,1,1
%>
<%
 if rs.bof then
 Response.write"<script> alert('用户名不存在或输入错误，请重新输入! ');this.location.href='login.asp'; </script>"
else
%>
<%
if rs("name")=request("name") and rs("password")=request("password") then
session("name")=request("name")
session("check")=1
session("class")=rs("class")
response.Redirect("admin_index.asp")
else
response.write"<script> alert('密码不正确或输入错误，请重新输入！');this.location.href='login.asp';</SCRIPT>"
end if
end if
%>