为评论插件增加批量删除 CMS

第一步：打开默认评论插件的_manage.asp文件找到
Case "Change"
在上方添加
'新增批量删除按钮 by cssHhaier
Case "qssDODelete"
ID = Replace(Replace(Request("ids"),"'","")," ","")
Call U.DeleteAll(ID)
Call Main()
第二步，添加列表表单

分别到适当位置
第三步，打开inc下_manage.class.asp
在Public Function Change()前新增
Public Function DeleteAll(Byval CommentIDS)
Dim Rs
Set Rs = DB("Select [ID] From [{pre}Comment] Where ID In (" & CommentIDS & ")",1)
Do While Not Rs.Eof
Call DB("Delete From [{pre}Comment] Where [ID]=" & Rs(0) ,0) '# 删除信息
Rs.MoveNext
Loop
Rs.Close
End Function
第四步，打开inc下_manage.js 底部新增
// 选择byqss
function CheckAll(){
var chk = $("chkall").checked;
for(var i = 0; i < frm.ids.length; i++){frm.ids[i].checked=chk; }
}
// 批量删除
function qssCommentDo(val){
var id='';
var runit=false;
frm.action= '_manage.asp?Act=' +val;
for(var i = 0; i < frm.ids.length; i++){
if(frm.ids[i].checked){runit=true; }
}
if(runit){
if(val=='qssDODelete'){
if(confirm('您确定要删除这些记录吗?')){frm.submit(); }
} else {
frm.submit();
}
}
}

为评论插件增加批量删除

推荐阅读

爱普生r309废墨满

有9999层被动的德莱文会发生什么情况？

指甲|你剪了大半辈子的指甲，居然剪错了

椭圆焦距是什么椭圆的相关知识

七日杀上帝模式指令与作弊代码大全七日杀攻略秘籍

手机用什么消毒比较好

罗汉果本身就是甜的吗罗汉果是甜的吗

技术培训学校机构有哪些，电脑技术培训机构有哪些

一加五t和9r的相机参数？1加5t手机参数配置

osxmysql客户端

翻译《传习录》传习录翻译

市场份额|Canalys：2022 年印度手机市场同比增长 12%，realme 增速惊人

怎么把视频放到迅雷播放如何把视频正过来迅雷看看，如何把视频正过来迅雷看看下载

胡桃夹子是什么

电脑杀毒软件哪个好

国泰君安企业咋样国泰君安怎么样

张盼名字打分97分张盼这个名字怎么样

大豆种子萌发的必备条件是什么，东升一号大豆积温多少

注册品牌怎么查询品牌注册，注册公司名称查询系统

幻书启世录召唤流怎么搭配,召唤流搭配技巧