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

📄 admin_htmldel.asp

📁 小说站源代码文件
💻 ASP
字号:
<!-- #include file="../conn.asp" -->
<!--#include file="../inc/config.asp"-->
<!-- #include file="session.asp" -->
<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link href="css.css" rel="stylesheet" type="text/css">
<script language="javaScript" src="../js/js.js"></script>
<style type="text/css">
<!--
.style1 {color: #FF0000}
-->
</style>
</head>

<body>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b>
		<a href="admin_HTMLdel.asp?info=webindex" target="right">
		<font color="#FFFFFF">首页删除</font></a><font color="#FFFFFF"> 
		|&nbsp; </font> <a href="admin_HTMLdel.asp?info=booklist" target="right">
		<font color="#FFFFFF">列表页删除</font></a><font color="#FFFFFF"> 
		|&nbsp; </font> <a href="admin_HTMLdel.asp?info=booklook" target="right">
		<font color="#FFFFFF">资料页删除</font></a><font color="#FFFFFF">
		|&nbsp;	</font>	<a href="admin_HTMLdel.asp?info=bookindex" target="right">
		<font color="#FFFFFF">目录页删除</font></a><font color="#FFFFFF">
		|&nbsp;	</font>	<a href="admin_HTMLdel.asp?info=bookall" target="right">
		<font color="#FFFFFF">全文页删除</font></a><font color="#FFFFFF">
		|&nbsp;	</font>	<a href="admin_HTMLdel.asp?info=bookzhang" target="right">
		<font color="#FFFFFF">分卷页删除</font></a><font color="#FFFFFF">
		|&nbsp;	</font>	<a href="admin_HTMLdel.asp?info=bookpage" target="right">
		<font color="#FFFFFF">章节页删除</font></a><font color="#FFFFFF"> </font>
		</b>
		</td>
	</tr>
</table>
<br>
<%

Select Case request.querystring("info")
	Case "webindex"
		Call webindex()
	Case "booklist"
		Call booklist()
	Case "booklook"
		Call booklook()
	Case "bookindex"
		Call bookindex()
	Case "bookall"
		Call bookall()
	Case "bookzhang"
		Call bookzhang()
	Case "bookpage"
		Call bookpage()
end select 

Sub webindex()%>
<table border="0" cellspacing="1" style="border-collapse: collapse" width="100%" bgcolor="#555555" height="100%">
	<form method="post" action="admin_HTMLdeldo.asp?info=webindex">
		<tr>
			<td width="100%" bgcolor="#1C3566"height="30">
			<p align="center"><b><font color="#FFFFFF">删除网站首页HTML</font></b></td>
		</tr>
		<tr>
			<td width="100%" bgcolor="#DFDFDF"><input type="hidden" name="info" value="webindex">
			<p align="center"><input name="change" class="button" value="删除网站首页" type="submit"></p>
			</td>
		</tr>
	</form>
</table>

<%end sub

Sub booklist()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品列表页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=booklist">
	<tr height="26">
      <td width="50%">
		<p align="right">作品列表页面:</td>
      <td width="50%">&nbsp;&nbsp;<select name="classid" class="form" size="1">
<option value="0">作品总列表</option>
<option value="to">作品排行榜</option>
<%set rs=server.createobject("adodb.recordset")
sql="select typeid,list_tpye from list_type"
rs.open sql,conn,1,1
Do while not rs.eof
%>
<option value="<%=Cstr(rs("typeid"))%>">
<%=rs("list_tpye")%></option> <%
rs.MoveNext
Loop
rs.close
Set  Rs=Nothing%>
<option value="ov">完成作品列表</option>
</select></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="booklist">
		<input class="button" type="submit" value="开始删除" name="B1">
	  </td>
    </tr>
</form>
</table>

<%end sub

Sub booklook()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品资料页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=booklook">
	<tr height="26">
      <td width="50%">
		<p align="right">本地作品起始ID:</td>
      <td width="50%">&nbsp;&nbsp;<input class='form' type="Number" name="start" id="start" size="20"></td>
    </tr>
    <tr height="26">
      <td width="50%">
		<p align="right">本地作品结束ID:</td>
      <td width="50%">&nbsp; <input class='form' type="text" name="end" Id="end" size="20"></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="booklook">
		<input class="button" type="submit" value="开始删除" name="B1">&nbsp;&nbsp;&nbsp;&nbsp; <input class="button" type="reset" value="重置设定" name="B2">
	  </td>
    </tr>
</form>
</table>

<%end sub

Sub bookindex()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品目录页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=bookindex">
	<tr height="26">
      <td width="50%">
		<p align="right">本地作品起始ID:</td>
      <td width="50%">&nbsp;&nbsp;<input class='form' type="Number" name="start" id="start" size="20"></td>
    </tr>
    <tr height="26">
      <td width="50%">
		<p align="right">本地作品结束ID:</td>
      <td width="50%">&nbsp; <input class='form' type="text" name="end" Id="end" size="20"></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="bookindex">
		<input class="button" type="submit" value="开始删除" name="B1">&nbsp;&nbsp;&nbsp;&nbsp; <input class="button" type="reset" value="重置设定" name="B2">
	  </td>
    </tr>
</form>
</table>

<%end sub

Sub bookall()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品全文阅读页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=bookall">
	<tr height="26">
      <td width="50%">
		<p align="right">本地作品起始ID:</td>
      <td width="50%">&nbsp;&nbsp;<input class='form' type="Number" name="start" id="start" size="20"></td>
    </tr>
    <tr height="26">
      <td width="50%">
		<p align="right">本地作品结束ID:</td>
      <td width="50%">&nbsp; <input class='form' type="text" name="end" Id="end" size="20"></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="bookall">
		<input class="button" type="submit" value="开始删除" name="B1">&nbsp;&nbsp;&nbsp;&nbsp; <input class="button" type="reset" value="重置设定" name="B2">
	  </td>
    </tr>
</form>
</table>

<%end sub

Sub bookzhang()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品分卷阅读页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=bookzhang">
	<tr height="26">
      <td width="50%">
		<p align="right">本地作品起始ID:</td>
      <td width="50%">&nbsp;&nbsp;<input class='form' type="Number" name="start" id="start" size="20"></td>
    </tr>
    <tr height="26">
      <td width="50%">
		<p align="right">本地作品结束ID:</td>
      <td width="50%">&nbsp; <input class='form' type="text" name="end" Id="end" size="20"></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="bookzhang">
		<input class="button" type="submit" value="开始删除" name="B1">&nbsp;&nbsp;&nbsp;&nbsp; <input class="button" type="reset" value="重置设定" name="B2">
	  </td>
    </tr>
</form>
</table>

<%end sub

Sub bookpage()%>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
	<tr>
		<td height="34" align="center" valign="middle" bgcolor="#1C3566"><b><font color="#FFFFFF">作品章节阅读页HTML删除</font></b></td>
	</tr>
</table>
<table width="100%" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="#1f3566" bordercolordark="#FFFFFF">
<form method="get" action="admin_HTMLdeldo.asp?info=bookpage">
	<tr height="26">
      <td width="50%">
		<p align="right">本地作品起始ID:</td>
      <td width="50%">&nbsp;&nbsp;<input class='form' type="Number" name="start" id="start" size="20"></td>
    </tr>
    <tr height="26">
      <td width="50%">
		<p align="right">本地作品结束ID:</td>
      <td width="50%">&nbsp; <input class='form' type="text" name="end" Id="end" size="20"></td>
    </tr>
    <tr>
      <td height="30" align="center" colspan="2"><input type="hidden" name="info" value="bookpage">
		<input class="button" type="submit" value="开始删除" name="B1">&nbsp;&nbsp;&nbsp;&nbsp; <input class="button" type="reset" value="重置设定" name="B2">
	  </td>
    </tr>
</form>
</table>

<%end sub%>

</body>

</html>

⌨️ 快捷键说明

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