📄 admin.asp

📁 一个不错的企业网站
💻 ASP
字号:
<!--#include file="inc/config.asp"-->
<!--#include file="mdb/home_mdb.asp"-->
<!--#include file="inc/error.asp"-->
<!--#include file="inc/FORMAT.asp"-->
<title>管理登录</title>
<%
dim founderr,errmsg
founderr=false
errmsg=""
dim adminname
dim adminpwd
if request("action")="adminlogin" then
       s=Trim(Request.Form("s"))
	   s2=Request.Form("s2")
	   If s2<>s Then
	   	   Response.Write("<script language=javascript>alert('请输入正确的认证码！');this.location.href='admin.asp';</script>")
		   Response.End
	   end if
adminname=trim(replace(request("adminname"),"'",""))
adminpwd=trim(replace(request("adminpwd"),"'",""))

if adminname="" and adminpwd="" then
	   	   Response.Write("<script language=javascript>alert('请输入用户名或密码！');this.location.href='admin.asp';</script>")
		   Response.End
end if
if founderr then
call diserror
response.end
end if
sql="select * from admin where admin_name='"&adminname&"' and admin_password='"&adminpwd&"'"
set rs=conn.execute(sql)
if rs.eof and rs.bof then
   rs.close
   set rs=nothing
	   	   Response.Write("<script language=javascript>alert('您输入的用户名和密码不正确!！');this.location.href='admin.asp';</script>")
		   Response.End
else
   session("adminlogin")=sessionvar
   session("issuper")=rs("admin_id")
   session.timeout=50
   rs.close
   set rs=nothing
end if
elseif request("action")="logout" then
  session("adminlogin")=""
  session("issuper")=""
  Response.write "<script>window.document.location.href='./admin.asp';</script>"
end if
if session("adminlogin")=sessionvar then
frame=request("frame")
if frame="" then
%>
<html>
<head>
<title>∷ 管理中心 ∷</title>
<head>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="inc/adminstyle.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1126" name=GENERATOR>
</HEAD>
<body onkeydown=return(!(event.keyCode==78&&event.ctrlKey))><br><br><br> 
<script>if(top==self)top.location="adminindex.asp" </script>
<table cellpadding="2" cellspacing="1" border="0" width="760" align=center class="a2">
<tr>
<td class="a1" colspan=2 height=25 align="center"><b>登陆成功提示!</b></td>
</tr>
<tr class=a4>
<td width="50%" height=23>服务器类型：<%=Request.ServerVariables("OS")%> ( IP:<%=Request.ServerVariables("LOCAL_ADDR")%> )</td>
<td width="50%">脚本解释引擎：<%=ScriptEngine & "/"& ScriptEngineMajorVersion &"."&ScriptEngineMinorVersion&"."& ScriptEngineBuildVersion %></td>
</tr>
<tr class=a4>
<td width="50%" height=23>服务器软件的名称：<%=Request.ServerVariables("SERVER_SOFTWARE")%></td>
<td width="50%">数据库路径：<%=DBPath%></td>
</tr>
</table>
<br><br><p align="center">
本程序由<font color="#FF0000"><a href="http://www.mtfly.com">MTFLY.com</a></font>美化！<br>程序版权归原作者所有</p>
      <%else%>
</tr><br></td>
  </tr>
  <tr>
    
  </tr>
</table>
<p>&nbsp;</p>
</body>
</html>
<%end if%>
<%else
dim s
randomize timer
s=Int((8999)*Rnd +1000)%>
<HTML><HEAD><TITLE>管理中心</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
href="img/adminstyle.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1126" name=GENERATOR>
<script language=javascript>
  function xxg()
  {
      if (document.form1.adminname.value==""){
	      alert("请输入用户名？")
		  document.form1.adminname.focus();
		  return false
		    }
	  if (document.form1.adminpwd.value==""){
	      alert("请输入密码的密码？");
		  document.form1.adminpwd.focus();
		  return false
		  }
		  return true
  }
  function reset_form()
  {
   document.form1.adminname.value="";
   document.form1.adminpwd.value="";
   document.form1.s.value="";
   document.form1.adminname.focus;
  }
</script>
</HEAD>
<body onkeydown=return(!(event.keyCode==78&&event.ctrlKey))><br><br><br> 
      <table width="280" border="0" cellspacing="1" cellpadding="10" align="center" bgcolor="#000000">
<form name="form1" method="post" action="admin.asp?action=adminlogin" onsubmit="return xxg()">
  <tr> 
    <td bgcolor="#E8E8E8" align="center"  colspan="2">管理登陆</td>
  </tr>
  <tr  class="a3"> 
    <td bgcolor="#FFFFFF" width="80">用 户：</td><td bgcolor="#FFFFFF" width="200"><input type="text" name="adminname" class="textarea" size="20"></td>
  <tr> 
    <td bgcolor="#FFFFFF">密 码：</td><td bgcolor="#FFFFFF"><input type="password" name="adminpwd" class="textarea" size="20"></td>
  </tr>
  </tr>
<tr> 
            <td  bgcolor="#FFFFFF">认证码:</td>
            <td bgcolor="#FFFFFF"><input name="s" type="text" size="14">
              &nbsp;<b><%=s%></b>
              <input maxlength=20 name="s2" size=12 type=hidden value="<%=s%>"></td>
          </tr>
  <tr>
    <td bgcolor="#FFFFFF"  colspan="2" align="center"><input type="submit" name="Submit" value="登录" class="button"></td>
  </tr>
</table>
</body></html>
<%end if%>
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -