给Totoro插件加上清理全部垃圾评论功能

密陀僧

由于博客遭遇连续spam，Totoro的这个修改应运而生了。
相信使用gmail的朋友一定很喜欢垃圾邮件的那个清除所有垃圾邮件的链接吧，下面是给Totoro插件加上清理全部垃圾评论功能的修改方法：
打开PLUGIN/Totoro/setting1.asp,把

1. Response.Write "
   
2. <form id=""frmBatch"" method=""post"" action=""""><p><input type=""hidden"" id=""edtBatch"" name=""edtBatch"" value=""""/><input class=""button"" type=""submit"" onclick='BatchDeleteAll(""edtBatch"");if(document.getElementById(""edtBatch"").value){this.form.action="""&ZC_BLOG_HOST&"plugin/totoro/commentdel.asp"&""";return window.confirm("""& ZC_MSG058 &""");}else{return false}' value=""删除所选择的评论"" id=""btnPost""/>      <input class=""button"" type=""submit"" onclick='BatchDeleteAll(""edtBatch"");if(document.getElementById(""edtBatch"").value){this.form.action="""&ZC_BLOG_HOST&"plugin/totoro/commentpass.asp"&""";return window.confirm("""& ZC_MSG058 &""");}else{return false}' value=""通过所选择的评论"" id=""btnPost""/></p><form>
   
3. " & vbCrlf

复制代码

修改为:

1.   Dim comm_ID_arr
   
2.   Set objRS=objConn.Execute("SELECT [comm_ID] FROM [blog_Comment] "& strSQL &" ORDER BY [comm_ID] DESC")
   
3.   Do While Not objRS.Eof
   
4.     comm_ID_arr=objRS(0)&","&comm_ID_arr
   
5.   objRS.Movenext
   
6.   Loop
   
7.   
   
8.   Response.Write "
   
9. <form id=""frmBatch"" method=""post"" action=""""><p><input type=""hidden"" id=""edtBatch"" name=""edtBatch"" value=""""/><input class=""button"" type=""submit"" onclick='document.getElementById(""edtBatch"").value="""&comm_ID_arr&""";if(document.getElementById(""edtBatch"").value){this.form.action="""&ZC_BLOG_HOST&"plugin/totoro/commentdel.asp"&""";return window.confirm("""& ZC_MSG058 &""");}else{return false}' value=""删除所有垃圾评论"" id=""btnPost""/>      <input class=""button"" type=""submit"" onclick='BatchDeleteAll(""edtBatch"");if(document.getElementById(""edtBatch"").value){this.form.action="""&ZC_BLOG_HOST&"plugin/totoro/commentdel.asp"&""";return window.confirm("""& ZC_MSG058 &""");}else{return false}' value=""删除所选择的评论"" id=""btnPost""/>      <input class=""button"" type=""submit"" onclick='BatchDeleteAll(""edtBatch"");if(document.getElementById(""edtBatch"").value){this.form.action="""&ZC_BLOG_HOST&"plugin/totoro/commentpass.asp"&""";return window.confirm("""& ZC_MSG058 &""");}else{return false}' value=""通过所选择的评论"" id=""btnPost""/></p><form>
   
10. " & vbCrlf

复制代码

即可。

skyforever

先全选，然后删除选择的评论不就可以了？？

小一

4242~~全选~~删除所选.....呵呵!
不过LZ精神可佳,赞一个!

Google

呵呵，楼主分享精神可佳，但认识上失误

密陀僧

你们这些笨蛋，不会体会到删除1000条垃圾评论的时候上述修改的好处的。

Google

后台就有全选删除，一健全K的功能。

你能说出什么根本上的区别？

Google

除非后台的全选，只是全选所操作的页面，对其它页面不起选中作用。

那么就要赞赞你了。

密陀僧

后台的全选当然是全选所操作的页面喽
一看就知道是没用过Totoro的...要么就是不认真的用，嘿嘿

Google

  1、2楼，要抓回来重新洗脑，特别是版主。

密陀僧

给偶加个精就好了
哈哈

Zx.MYS

1K条SPAM？

skyforever

mys都流汗。。。。。。^_^

我的blog从来没那么多过，10多条就被我咔嚓了。