adminpass.asp

来自「旅游管理系统 用ASP+SQL 2」· ASP 代码 · 共 20 行

<!--#include file="../../conn.asp"-->
<%
admin_name=request("admin_name")
admin_password=request("admin_password")
Set rs_admin = Server.CreateObject("ADODB.Recordset")
sql="select * from admin where username = '" & admin_name & "' and password = '" & admin_password & "'"
rs_admin.open sql,conn,3,2
if rs_admin.eof and rs_admin.bof then
   response.write "<script language='javascript'>"
   response.write "alert('账号或密码错误！');"
   response.write "history.go(-1);"
   response.write "</script>"
   response.end
end if
rs_admin.close
session("admin_pass")="ok"
   response.write "<meta http-equiv='refresh' content='1; url=default.asp'>"
%>