📄 recycle.asp
字号:
<!--#include file ="setup.asp"-->
<%
validate "login.asp",5
if Request.ServerVariables("request_method")="POST" then
Select Case Request.QueryString("Tihs")
Case "Forum"
Select Case trim(Request("B1"))
Case "删除"
for each nums in request.form("TBbsID")
conn.execute("delete from Forum where ShowID="&nums)
next
Case "还原"
for each nums in request.form("TBbsID")
conn.execute("update Forum set DelThis=False where ShowID="&nums)
next
End Select
Case "BbsInfo"
Select Case trim(Request("B1"))
Case "删除"
for each nums in request.form("TBbsID")
conn.execute("delete from BbsInfo where BbsId="&nums)
next
Case "还原"
for each nums in request.form("TBbsID")
conn.execute("update BbsInfo set DelThis=False where BbsId="&nums)
next
End Select
Case "OrderList"
Select Case trim(Request("B1"))
Case "删除"
for each nums in request.form("TBbsID")
conn.execute("delete * from OrderList where Ordersingle="&nums)
next
Case "还原"
for each nums in request.form("TBbsID")
conn.execute("update OrderList set DelThis=False where Ordersingle="&nums)
next
End Select
Case "Product_Info"
Select Case trim(Request("B1"))
Case "删除"
for each nums in request.form("TBbsID")
conn.execute("delete * from Product_Info where ProductID="&nums)
next
Case "还原"
for each nums in request.form("TBbsID")
conn.execute("update Product_Info set DelThis=False where ProductID="&nums)
next
End Select
Case "UserInfo"
Select Case trim(Request("B1"))
Case "删除"
for each nums in request.form("TBbsID")
conn.execute("delete * from UserInfo where UserID="&nums)
next
Case "还原"
for each nums in request.form("TBbsID")
conn.execute("update UserInfo set DelThis=False where UserID="&nums)
next
End Select
Case Else
Error 1,"参数非法传递！\n 您的IP已被记录！",""
End Select
end if
Call Top
Call table()
Response.Write("<style><!-- TABLE{BORDER-TOP:0px;BORDER-LEFT:0px;BORDER-BOTTOM:1px}TD{BORDER-RIGHT:0px;BORDER-TOP:0px}--></style><br>")
%>
<style type="text/css">
<!--
.unnamed1 {
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
border-top-style: none;
border-right-style: none;
border-bottom-style: solid;
border-left-style: solid;
border-top-color: #a4b6d7;
border-right-color: #a4b6d7;
border-bottom-color: #a4b6d7;
border-left-color: #a4b6d7;
}
.a1 {
border-top-width: 1px;
border-right-width: 1px;
border-bottom-width: 1px;
border-left-width: 1px;
border-top-style: none;
border-right-style: solid;
border-bottom-style: solid;
border-left-style: solid;
border-top-color: #a4b6d7;
border-right-color: #a4b6d7;
border-bottom-color: #a4b6d7;
border-left-color: #a4b6d7;
}
-->
</style>
<script>
function CheckAll(form){
for (var i=0;i<form.elements.length;i++){
var e = form.elements[i];
if (e.name != 'chkall')e.checked = form.chkall.checked;
}
}
function checkclick(msg){if(confirm(msg)){event.returnValue=true;}else{event.returnValue=false;}}
</script>
<%Select Case Trim(Request("Menu"))
Case "All"
Tab "商城回收站","请确定以下信息为无用信息后清空回收站以释放更多的空间！"%>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除论坛信息 <strong><font color="#FF0000"><%= conn.execute("Select count(BbsId)from BbsInfo Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=BbsInfo>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=BbsInfo>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=BbsInfo>全部还原</a>
</TD></TR></TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除主题信息 <strong><font color="#FF0000"><%= conn.execute("Select count(ShowID)from Forum Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=Forum>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=Forum>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=Forum>全部还原</a>
</TD></TR></TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除订单信息 <strong><font color="#FF0000"><%= conn.execute("Select count(Ordersingle)from OrderList Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=OrderList>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=OrderList>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=OrderList>全部还原</a>
</TD></TR></TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除产品信息 <strong><font color="#FF0000"><%= conn.execute("Select count(ProductID)from Product_Info Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=Product_Info>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=Product_Info>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=Product_Info>全部还原</a>
</TD></TR></TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除用户信息 <strong><font color="#FF0000"><%= conn.execute("Select count(UserID)from UserInfo Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=UserInfo>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=UserInfo>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=UserInfo>全部还原</a>
</TD></TR></TABLE>
<TABLE borderColor=#a4b6d7 cellSpacing=0 cellPadding=3 width=100% border=1 style="border-collapse: collapse" ID="Table1">
<TR> <TD height=12 width="65%" > <img src="images/2.gif" width="60" height="9">删除拍卖产品 <strong><font color="#FF0000"><%= conn.execute("Select count(Forced_ID)from Forced_sale Where DelThis=True")(0) %></font></strong> 条
</TD><TD height=12 width="35%" > <a target=_blank href=?menu=OpenAll&Tihs=Forced_sale>查看详细信息</a> <a onclick="checkclick('您确定要全部删除?')" href=?menu=DelThis&Tihs=Forced_sale>全部删除</a> <a onclick="checkclick('您确定要全部还原?')" href=?menu=ReThis&Tihs=Forced_sale>全部还原</a>
</TD></TR></TABLE>
<%Case "DelThis"
conn.execute("delete from "&Request.QueryString("Tihs")&" where DelThis=True")
response.redirect "Recycle.asp?Menu=All"
Case "ReThis"
conn.execute("update "&Request("Tihs")&" set DelThis=False where DelThis=True")
response.redirect "Recycle.asp?Menu=All"
Case "OpenAll"
Select Case Request.QueryString("Tihs")
Case "Forum"%>
<table borderColor="#a4b6d7" background=images/title_sub.gif cellSpacing="0" cellPadding="0" width="100%" border="1" style="border-left: 0px none; border-top: 0px none; border-bottom: 1px none; border-collapse:collapse">
<form method="POST" name="form"><tr>
<td width="4%" ><input type=checkbox name=chkall value=on onclick=CheckAll(this.form)> </td>
<td align="middle" height="24" width="45%"><font color="#000000"><font color="#000000"> 主题</font></font></td>
<td align="middle" width="13%" height="24"><font color="#000000"><font color="#000000">作者</font></font></td>
<td align="middle" width="9%" height="24"><font color="#000000">字/[回]</font></td>
<td width="27%" height="24"> <center><font color="#000000">最后回复</font></a></font></center></td>
</TR></TABLE>
<%
Sql="Select ShowID,UserID,Title,Icon,UserName,AllPost,Content,LastTime,Restore From Forum where DelThis=True"
Set Rs = Conn.Execute(Sql)
Do While Not Rs.Eof%>
<table cellSpacing="0" cellPadding="3" width="100%" border="0"><tr>
<td width="4%" class=unnamed1><input name="TBbsID" type="checkbox" value="<%=Rs("ShowID")%>"></td>
<td width="45%" class=unnamed1> <img loaded="no" src="images/plus.gif" style="cursor:hand;" >
<img src=images/brow/<%= Rs("Icon") %>.gif border=0><font color="#000000"><%= Rs("Title") %> <% NextPage rs("ShowID"),Rs("AllPost") %></font></div></td>
<td align="middle" width="13%" class=unnamed1><font color="#000000"><a href=ShowUserInfo.asp?UsId=<%=rs("UserID")%>><%= Rs("UserName") %></a></font></td>
<td align="middle" width="9%" class=unnamed1><font color="#000000"><%= Len(Rs("Content")) %>/<font color="#CC3300">[<%= Rs("AllPost") %>]</font></font></td>
<td align="center" width="27%" height="24" class=a1> <font color="#000000"><%= Rs("LastTime") %> | <%= Rs("Restore") %></font></td>
</TR>
</TABLE>
<%Rs.Movenext
Loop
Case "BbsInfo"%>
<TABLE borderColor="#a4b6d7" background=images/title_sub.gif cellSpacing="0" cellPadding="0" width="100%" border="1" style="border-left: 0px none; border-top: 0px none; border-bottom: 1px none; border-collapse:collapse">
<form name="form1" method="post"><TR height=25>
<TD width=8% align=middle> <p align="center"><input type=checkbox name=chkall value=on onclick=CheckAll(this.form)></TD>
<TD align=middle width="17%"> <div align="center">论坛名称</div></TD>
<TD align=middle width="31%"> <div align="center">论坛简介</div></TD>
<TD align=middle width=12%> <div align="center">版主</div></TD>
<TD align=middle width=11%><div align="center">论坛密码</div></TD>
<TD align=middle width=11%><div align="center">论坛状态</div></TD>
<TD align=left width=10%> <p align="center">排序</TD>
</TR>
</TABLE>
<%
Sql="Select BbsId,BbsName,BbsInfo,BbsMan,BbsPsd,BbsShow,BbsPx From BbsInfo where DelThis=True"
Set Rs = Conn.Execute(Sql)
Do While Not Rs.Eof%>
<TABLE borderColor=a4b6d7 cellSpacing=0 cellPadding=0 width="100%" border=1 style="border-collapse: collapse" height="24">
<TR height=25>
<TD width=8% align=middle> <p align="center"><input name="TBbsID" type="checkbox" value="<%= Rs("BbsId") %>"></TD>
<TD align=middle width="17%"> <div align="center"><%= Rs("BbsName") %> </div></TD>
<TD align=middle width="31%"> <div align="center"><%= Rs("BbsInfo") %>
</div></TD><TD align=middle width=12%> <div align="center"><%= Rs("BbsMan") %> </div></TD>
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -