savecomment.asp

时代购物系统 4.0功能升级说明 <1>完善了3.0的VIP

<!--#include file="conn.asp"-->
<%if session("admin")="" then
response.Write "<script language='javascript'>alert('请先登录！');history.go(-1);</script>"
response.End
else
if session("rank")=2 then
response.Write "<div align=center><font size=5 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("audit").count=0 then
response.write "<script language=javascript>alert('您没有选择要删除的评论？');history.go(-1);</script>"
response.End
end if
conn.execute ("delete from review where reviewid in ("&request("audit")&")")
response.write "<script language=javascript>alert('批量删除成功!');history.go(-1);</script>"
response.end
case "audit"
if request("audit").count=0 then
response.write "<script language=javascript>alert('您没有选择要审核的评论？');history.go(-1);</script>"
response.End
end if
conn.execute "update review set audit=1 where reviewid in ("&request("audit")&")"
response.write "<script language=javascript>alert('批量审核成功!');history.go(-1);</script>"
response.end
case "delzhou"
dim theday
theday=date-7
conn.execute ("delete from review where reviewdtm<#"&theday&"# and audit=0")
response.write "<script language=javascript>alert('一周前未审核评论删除成功!');history.go(-1);</script>"
response.end
case "delall"
conn.execute ("delete from review where audit=0")
response.write "<script language=javascript>alert('所有未审核评论删除成功!');history.go(-1);</script>"
response.end
end select
%>