<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('網絡超時或您還沒有登陸！');window.location.href='login.asp';</script>"
response.End
else
if session("flag")=2 then
response.Write "<div align=center><font size=80 color=red><b>您沒有此項目管理權限！</b></font></div>"
response.End
end if
end if
dim action
action=request.QueryString("action")
select case action
case "del"
if request("shenhe").count=0 then
response.write "<script language=javascript>alert('您沒有選擇要刪除的評論？');history.go(-1);</script>"
response.End
end if
conn.execute ("delete from shop_pinglun where pinglunid in ("&request("shenhe")&")")
response.write "<script language=javascript>alert('批量刪除成功!');history.go(-1);</script>"
response.end
case "shenhe"
if request("shenhe").count=0 then
response.write "<script language=javascript>alert('您沒有選擇要審核的評論？');history.go(-1);</script>"
response.End
end if
conn.execute "update shop_pinglun set shenhe=1 where pinglunid in ("&request("shenhe")&")"
response.write "<script language=javascript>alert('批量審核成功!');history.go(-1);</script>"
response.end
case "delzhou"
dim theday
theday=date-7
conn.execute ("delete from shop_pinglun where pinglundate<#"&theday&"# and shenhe=0")
response.write "<script language=javascript>alert('一周前未審核評論刪除成功!');history.go(-1);</script>"
response.end
case "delall"
conn.execute ("delete from shop_pinglun where shenhe=0")
response.write "<script language=javascript>alert('所有未審核評論刪除成功!');history.go(-1);</script>"
response.end
end select
%>