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

📄 admin_itemsdownbooks.asp

📁 小说站源代码文件
💻 ASP
字号:
<!-- #include file="../conn.asp" -->
<!--#include file="../inc/config.asp"-->
<!-- #include file="session.asp" -->
<link href="css.css" rel="stylesheet" type="text/css">

<%
act = Request("act")

if act = "getbook" then
makelookjt = Request("makelookhtml")
If makelookjt="" or makelookjt=null Then
	makelookjt=0
end if
makereadjt = Request("makereadhtml")
If makereadjt="" or makereadjt=null Then
	makereadjt=0
end if
makeviewjt = Request("makeviewhtml")
If makeviewjt="" or makeviewjt=null Then
	makeviewjt=0
end if
makecookjt = Request("makecookhtml")
If makecookjt="" or makecookjt=null Then
	makecookjt=0
end if
makeallpjt = Request("makeallphtml")
If makeallpjt="" or makeallpjt=null Then
	makeallpjt=0
end if

makebookHTML=makelookjt&","&makereadjt&","&makeviewjt&","&makecookjt&","&makeallpjt

Fastbook = Request("Fastbook")
If Fastbook="" or Fastbook=null Then
	Fastbook=0
end if
lostbook = Request("lostbook")
If lostbook="" or lostbook=null Then
	lostbook=0
end if
flushbook = Request("flushbook")
If flushbook="" or flushbook=null Then
	flushbook=0
end if
listedID = Request("listedID")
If listedID="" Then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>请填写完整信息</li>"
else
	listedID=replace(replace(listedID,chr(10),""),chr(13),"|")
	arrBookList = Split(listedID,"|")
	idTotal=UBound(arrBookList)+1
End If
If FoundErr=True Then
	call WriteErrMsg(ErrMsg)
Else
	response.write "<SCRIPT language=JavaScript>if(!confirm('"
	response.write "\n你选择的是手工输入ID列表更新    \n"
	response.write "\n根据填写内容,接下来将要更新 "&idTotal&" 部作品    \n"
	if idTotal>99 and idTotal<500 then
		response.write "\n你填写的作品ID多,更新 "&idTotal&" 部作品需要的时间比较长    \n"
		response.write "\n且容易造成采集系统停止响应,你确定继续吗?    \n"
	elseif idTotal>500 and idTotal<1000 then
		response.write "\n你填写的作品ID稍多,更新 "&idTotal&" 部作品需要的时间很长    \n"
		response.write "\n且很易造成采集系统停止响应,建议返回重新设置,你确定继续吗?    \n"
	elseif idTotal>1000 and idTotal<10000 then
		response.write "\n你填写的作品ID很多,更新 "&idTotal&" 部作品需要的时间非常长    \n"
		response.write "\n且极易造成采集系统停止响应,建议返回重新设置,你确定继续吗?    \n"
	elseif idTotal>10000 then
		response.write "\n你填写的作品ID过多,更新 "&idTotal&" 部作品需要的时间无法估量    \n"
		response.write "\n且必然造成采集系统停止响应,建议返回重新设置,你确定继续吗?    \n"
	end if
	response.write "\n点击 [ 确定 ] 继续,点击 [ 取消 ] 返回    \n"
	response.write "')){history.back(-1);}else{}</SCRIPT>"
	response.Write "<meta http-equiv='refresh' content='1;URL=Admin_ItemsloadBooks.asp?listedID="&listedID&"&lostbook="&lostbook&"&flushbook="&flushbook&"&makebookHTML="&makebookHTML&"&Fastbook="&Fastbook&"'>"
	response.End
end if

else
%>
<html>

<title>终点小说连载系统_定制批量采集系统</title>
<link href="css.css" rel="stylesheet" type="text/css">
<body>

<script language="javascript">
function checkstatu(frm)
	{
		if (frm.lostbook.checked == true)
        	if (!confirm("按照保存的最后采集参数向后采集,将照保存的最后采集参数向后采集,不再逐章检查。\n\n"))
        	{frm.lostbook.checked=false;}
	}
function checkstatus(frm)
	{
		if (frm.flushbook.checked == true)
        	if (!confirm("强制更新章节内容,将把所有的章节内容重新采集并更新,请慎重考虑。\n\n"))
        	{frm.flushbook.checked=false;}
	}
function checkstatusss(frm)
	{
		if (frm.Fastbook.checked == true)
        	if (!confirm("快速批量采集作品,不采集章节内容直接调用采集站内容,请慎重考虑。\n\n"))
        	{frm.Fastbook.checked=false;}
	}
</script>
<div id="topmomo">
	长篇采集系统项目管理</div>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tborder">
	<tr align="center">
		<td height="30"><a href="Admin_ItemManage.asp">管理首页</a> |
		<a href="Admin_ItemAddNew.asp">添加新项目</a> |
		<a href="Admin_ItemManages.asp">批量更新作品</a></td>
	</tr>
</table>
<table width="100%" border="0" align="center" cellpadding="0" cellspacing="1" class="tborder" style="LINE-HEIGHT: 150%">
	<tr>
		<td height="30" align="center" valign="middle" class="thead" colspan="2">
		全自动批量更新作品</td>
	</tr>
	<tr>
		<td height="26" align="center" valign="middle" class="tcat" colspan="2">
		此操作将自动采集指定范围内的作品更新后的章节, 此操作大量占用系统资源每次填写范围请不要过大</td>
	</tr>
	<form method="post" action="">
		<tr>
			<td width="30%" height="26" align=right class=alt2>当前采集方式:</td>
			<td width="70%" class=alt1>按照ID列表</td>
		</tr>
		<tr id="u_type2">
			<td width="30%" height="26" align=right class=alt2 valign="top">请输入本地作品ID:<br>(多个以[Enter]回车键隔开)</td>
			<td width="70%" class=alt1><textarea name="listedID" cols="30" rows="15" class="form"></textarea></td>
		</tr>
		<tr>
			<td width="30%" height="26" align="right" class="alt2">按照保存的最后采集参数向后采集:</td>
			<td width="70%" class="alt1">
			<input type="checkbox" name="lostbook" onclick="checkstatu(this.form)" value="1" class="form"><br>
			选择本功能将按照保存的最后采集参数向后采集,不再逐章检查判断是否存在新章节 <br>
			可以节约采集时间,节省采集资源.部分采集站不支持该功能(从目录中获取分卷ID的站点等)</td>
		</tr>
		<tr>
			<td width="30%" height="26" align="right" class="alt2">强制更新章节内容:</td>
			<td width="70%" class="alt1">
			<input type="checkbox" name="flushbook" onclick="checkstatus(this.form)" value="1" class="form"><br>
			选择本功能将把现有所有的章节内容重新采集并更新</td>
		</tr>
		<tr>
			<td width="30%" height="26" align="right" class="alt2">快速批量采集作品:</td>
			<td width="70%" class="alt1">
			<input type="checkbox" name="Fastbook" onclick="checkstatusss(this.form)" value="1" class="form"><br>
			选择本功能将在采集进行中不采集章节内容直接调用采集站内容 <br>
			完成后可以选择<a href="admin_Itemloadview.asp"><font color="#FF0000">批量采集作品章节内容</font></a>完整采集作品</td>
		</tr>
		<tr>
			<td width=30% class=alt2 height="26" valign="top" align="right">自动生成静态页面:</td>
			<td width="70%" class=alt1>
			<input type="checkbox" name="makelookhtml" value="1" class="form" checked>资料页&nbsp;&nbsp;
			<input type="checkbox" name="makereadhtml" value="1" class="form" checked>目录页&nbsp;&nbsp;
			<input type="checkbox" name="makeviewhtml" value="1" class="form" checked>章节页&nbsp;&nbsp;
			<input type="checkbox" name="makecookhtml" value="1" class="form">分卷页&nbsp;&nbsp;
			<input type="checkbox" name="makeallphtml" value="1" class="form">全文页<br>
			选择本功能将在采集的同时生成HTML静态页面,但会占用更多的系统资源</td>
		</tr>
		<tr>
			<td height="30" align="center" colspan="2" class=alt3>
			<input type="hidden" name="act" value="getbook" id="act" size="20">
			<input type="submit" value="开始采集" name="B1" class="button">&nbsp;&nbsp;&nbsp;&nbsp;
			<input type="reset" value="重置设定" name="B2" class="button"> </td>
		</tr>
	</form>
</table>
<%end if%>
</body>

</html>

⌨️ 快捷键说明

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