<!--#include file="../inc/config.asp"-->
<!--#include file="../inc/conn.asp"-->
<!-- #include file="inc/Session.asp" -->
<!-- #include file="inc/checkrole.asp" -->
<%
'''''''''''''''''''''''''''''''''''''''''''''''
call checkPrevilege(Session("Name"),"p09")
'''''''''''''''''''''''''''''''''''''''''''''''
BeginTime=Timer
dim act,hisidStr,hisidArr,newsUrl,isoutlink
act=request("act")
if not isempty(request.Form("hisid")) then
	hisidStr=request.Form("hisid")
else
	if(act<>"remove") then
	response.Write("请选择需要操作的文章记录")
	response.Write("<a href=""#"" onClick=""javascript:history.back();"">返回</a>")
	response.End()
	end if
end if
hisidArr=split(hisidStr,",")
Select Case LCase(act)
	Case "gathered"
		for i=0 to ubound(hisidArr)
			response.Write(hisidArr(i))
			conn.execute("update collect_his set iscollected=1 where id="&hisidArr(i))
		next
		response.Write("批量设置状态为已采集成功！")
		response.Redirect(request.ServerVariables("HTTP_REFERER"))
	Case "notgather"
		for i=0 to ubound(hisidArr)
			response.Write(hisidArr(i))
			conn.execute("update collect_his set iscollected=0 where id="&hisidArr(i))
		next
		response.Write("批量设置状态为未采集成功！")
		response.Redirect(request.ServerVariables("HTTP_REFERER"))	
	Case "del"
		for i=0 to ubound(hisidArr)
			conn.execute("delete from collect_his where id="&hisidArr(i)) 				
		next
		response.Write("批量删除成功！")		
		response.Redirect(request.ServerVariables("HTTP_REFERER"))
	Case "remove"
		conn.execute("truncate table collect_his")

		response.Redirect(request.ServerVariables("HTTP_REFERER"))
end Select
%>
<html>
<head>
<title>批量删除采集历史记录</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<style type="text/css">
<!--
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #FFFFFF;
	font-size:12px;
}
-->
</style>
</head>
<body>
</body>
</html>
<%
call connclose()
%>
执行时间：<%=CStr(FormatNumber((Timer-BeginTime)*1000,2))& "毫秒"%>