login_admin.asp

来自「一个功能强大的asp招聘求职系统」· ASP 代码 · 共 29 行

<% if request.form("name")=empty and request.form("password")=empty then
     response.write("<script>alert(""请按正常程序开启此页面"");window.close()</script>")
     response.end()
   end if
%>
<!--#include file="connection_management.asp"-->
<!--#include file="md5.asp"-->
<%
  rs.open "select name,password from athority where name='"&request.form("name")&"' and password='"&md5(request.form("password"))&"'",conn,1
  
  if rs.eof=true and rs.bof=true then
     response.write("<p>用户名或密码错误，请<a href=""login_form_admin.htm"">返回</a></p>")
     response.write("<script>alert(""用户名或密码错误！"");navigate(""login_form_admin.htm"")</script>")
     rs.close
     set rs=nothing
     set conn=nothing
     response.end()
  else
     session("postboard_admin")=true
     session("postboard_admin_name")="管理员"
     session.timeout=3

     response.write("<p>登陆成功，请<a href=""../index.asp"">返回首页</a></p>")
     response.write("<script>alert(""登陆成功！"");navigate(""../index.asp"")</script>")
     rs.close
     set rs=nothing
     set conn=nothing
  end if
%>