⭐ 欢迎来到虫虫下载站！ | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站
📤 上传资源

📄 admin.asp

📁 仿雅虎论坛静态生成html版 后台管理：admin/admin.asp 用户名：admin 密码：admin TOP/top.htm 顶部模板 left.htm 左边树形菜单模板
💻 ASP
字号:
🔍 
 <!--#include file="../conn.asp"-->
 <!--#include file="../board/Const.asp"-->
 <!--#include file="../board/BtBBS_Fun.asp"-->
 <!--#include file="../board/md5.asp"--> 
<%
  username=trim(Request.Form("username"))
  password=md5(trim(Request.Form("password")))
  Login=Request.Cookies("Login")
  username=replace(replace(replace(replace(username,"'","‘"),"<","&lt;"),">","&gt;")," ","&nbsp;")
  'password=replace(replace(replace(replace(password,"'","‘"),"<","&lt;"),">","&gt;")," ","&nbsp;")
  if username<>"" and password<>"" and Login="Y" then
    Set rs=conn.execute("select top 1 用户名,密码 from 用户资料 where 用户名='"&username&"' and 密码='"&password&"' and 权限='admin' ")
    if rs.bof and rs.eof then
     %><html>
     <body bgcolor="#000000">
     <!--#include file="../inc/top1.inc"--><%
     Login_EN
     Response.Write "<br><br><br><center>用户名/密码错误!</center><br><br><br><br>"
    else
     Response.Cookies("admin")=username
     session("admin")=username
     Response.Cookies("adminlogin")="Y"
     Response.Redirect "admin_index.asp"
    end if
  else
    if Request.Cookies("admin")="" or Request.Cookies("admin")<>Request.Cookies("username") or Request.Cookies("adminlogin")<>"Y" or session("admin")="" then
%>
<!--#include file="../inc/top1.inc"-->
 <%Login_EN%>
 <form name=newfile  method="post" action="admin.asp">
 <table width=743 align=center><tr><td><a href=../board/index.asp><font class=NavColor>首页</a>  >>  管理员入口</font></td></tr></table>
 <table border=1 width=230 cellspacing=0 cellpadding=0 align=center class=table1>
 <tr><td width=80 height=30 align=center class=light1><b>用户名:</b></td><td class=light>   
   <INPUT class=fminpt name=username type=text size=20></td></tr>
   <tr><td height=30 align=center class=light1><b>密&nbsp;&nbsp;码:</b></td><td class=light>
   <INPUT class=fminpt name=password type=password size=20></td></tr>
   </td></tr>
   <tr><td colspan=2 align=center height=30 class=light1><input type=Submit value="完成" name=add>&nbsp; <input type="reset" name="Clear" value="重写"></td></tr>
  </form>
 </table>
 <%
   else
     Response.Redirect "Admin_Index.asp"
   end if
 end if
 %>
 <!--#include file="../inc/tom1.inc"-->

⌨️ 快捷键说明

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