◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。
Email:sunwindy[A]gmail.com
给Totoro插件加上清理全部垃圾评论功能,兼警告这个济南礼品站的站长
Post by 密陀僧, 2007-12-25, Views:相信使用gmail的朋友一定很喜欢垃圾邮件的那个清除所有垃圾邮件的链接吧,下面是给Totoro插件加上清理全部垃圾评论功能的修改方法:
打开PLUGIN/Totoro/setting1.asp,把
Response.Write "<br/><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><br/>" & vbCrlf
Dim comm_ID_arr
Set objRS=objConn.Execute("SELECT [comm_ID] FROM [blog_Comment] "& strSQL &" ORDER BY [comm_ID] DESC")
Do While Not objRS.Eof
comm_ID_arr=objRS(0)&","&comm_ID_arr
objRS.Movenext
Loop
Response.Write "<br/><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><br/>" & vbCrlf
The End.
或许你还对下面的文章感兴趣
Comments
- 1.birder
- http://www.zfnn.com
- 你受到这个SB的骚挠啦了,NND的删累死了,我把这个IP屏了.
- 2007-12-29 8:53:58 回复
- 2.密陀僧
- http://0e2.net
- 啊啊啊,终于找到和我同病相怜的人了
爪子先... - 2007-12-29 9:46:26 回复
- 3.birder
- http://www.zfnn.com
- 我用上z-blog1.8了,今天早上TotoroⅡ已经起效果了,正在顽强抵抗垃圾评论的进攻.
另外,我发现在TotoroⅡ标题栏,有个全选功能,不知是不是你改进的.密陀僧 于 2008-1-21 10:17:14 回复标题栏的全选功能原来就有的
指的是全选当前页面所有条目 - 2008-1-21 9:36:19 回复
