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

📄 clearall.asp

📁 广告策划中心整站程序
💻 ASP
字号:
🔍 
<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="../comm/subconn.asp"-->

<%
dim cls
if session("admin")="" then
	Response.Redirect("admin.asp")	
else
	if session("flag")<>"0" then
	
		cls = Instr(session("flag"), "clearall")
		if cls <= 0 then
	%>
		<script language="javascript">
			if (confirm("您的操作权限不够,系统拒绝你的访问,请点确定返回,或者点取消退出重新登录"))
			  location.href="admin.asp";
			else
			  location.href="quit.asp";
		</script>
	<%
		end if
	end if
end if
%>
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="admin.css" type="text/css">
<title>系统清理</title>
<style type="text/css"><!--
a:link {color: #FFFFFF;text-decoration: none;}
a:visited {color: #FFFFFF;text-decoration: none;}
a:hover {color: #FFFF99;text-decoration: underline;}
.b{color:#cccc99;font-size:10pt;border:dotted 1px}
--></style>
</head>

<body bgcolor="#336699" background="../images/bggreen.gif" text=#ffffff topmargin="0">
<!--#include file="top.asp"-->

<table border="0" cellpadding="2" cellspacing="5" style="border-collapse: collapse" bordercolor="#222222" width="772" height="150" bgcolor="#336699" align="center">
    <tr><td width=125 valign="top">
<!--#include file="admin_left.asp"--> 
    </td><td valign="top" width=647>      
      <table border="1" cellpadding="2" cellspacing="4" style="border-collapse: collapse" bordercolor="#222222" width="100%">
         <tr>
            <td width="100%">当前位置:<a href="admin.asp">网站管理中心</a>--系统清理管理</td>
          </tr>
          <tr>
            <td width="100%"> <br><br><br>           
<%
dim db
db=request("db")
if db="" then
%>

            
         <div align="center"><a href="clearall.asp?db=prod">产品数据库清理</a></div>   <br>
		 <div align="center"><a href="clearall.asp?db=kehu">客户数据库清理</a></div><br>
		 <div align="center"><a href="clearall.asp?db=dingdan">订单数据库清理</a></div><br>
		 <div align="center"><a href="clearall.asp?db=faq">FAQ数据库清理</a></div><br>
		 <div align="center"><a href="clearall.asp?db=liuyan">留言数据库清理</a></div><br>
		 <div align="center"><a href="clearall.asp?db=wenzhang">文章数据库清理</a></div><br><br>  

<%
end if

if db="prod" then

	conn.Execute("delete from SearchType")
	conn.Execute("delete from ProdClass")
	conn.Execute("delete from prodmain")
	conn.Execute("delete from FileOther")
	response.write "<font color=""yellow"">产品数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
	
end if

if db="kehu" then
	conn.Execute("delete from usermain")
	response.write "<font color=""yellow"">客户数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
end if

if db="dingdan" then
	conn.Execute("delete from orderdetail")
	conn.Execute("delete from orderlist")
	response.write "<font color=""yellow"">订单数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
end if

if db="faq" then
	response.write "<font color=""yellow"">FAQ数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
end if

if db="liuyan" then
	conn.Execute("delete from feedback")
	response.write "<font color=""yellow"">留言数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
end if

if db="wenzhang" then
	conn.Execute("delete from news")
	response.write "<font color=""yellow"">文章数据库清理完成！</font><meta http-equiv=refresh content=""1;URL=clearall.asp"">"
end if
%>
            </td>
          </tr>
        </table>   
      </td></tr>
<tr>
      
    <td height="10" align=center colspan="2"><a href="http://www.cycoo.com">程序美工设计：九江市大地广告策划中心</a><%=sitever%></td>
    </tr>
</table>

</body></html>

⌨️ 快捷键说明

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