一段过滤垃圾信息的代码!

一早起来发现留言本里又多了好多条垃圾留言,忽然想起曾在浪人ㄨ黑白看到的一段代码,作用主要是过滤一些垃圾信息。PJBLOG在关键字过滤方面的功能确实还有点差强人意,将以下代码加到const.asp的最后面吧,可以检测提交的垃圾信息,例如垃圾评论、垃圾留言或者屏蔽某未注册用户的发言,都是可以的。

如果你需要功能增加,还可以把过滤字段写入数据库,使得可以动态的更新过滤字段。
[code]Dim GetFlag,ErrorSql,RequestKey,ForI
ErrorSql = “***.com||彩铃”
'此处写上你要过滤的关键字,记住,如果是英文请使用小写,大写的英文将无法被验证!
'其中***.com就是你要过滤的域名,用||隔开,彩铃的垃圾最多了,也写上吧,其他的大家自己加
ErrorSql = split(ErrorSql,”||”)
If Request.ServerVariables(”REQUEST_METHOD”)=”GET” Then
GetFlag=True
Else
GetFlag=False
End If
If GetFlag Then
For Each RequestKey In Request.QueryString
For ForI=0 To Ubound(ErrorSql)
If Instr(LCase(Request.QueryString(RequestKey)),ErrorSql(ForI))<>0 Then
Response.Write (”对不起你提交的字段中有被管理员列入黑名单的关键字”)
Response.End
End If
Next
Next
Else
For Each RequestKey In Request.Form
For ForI=0 To Ubound(ErrorSql)
If Instr(LCase(Request.Form(RequestKey)),ErrorSql(ForI))<>0 Then
Response.Write(”对不起你提交的字段中有被管理员列入黑名单的关键字”)
Response.End
End If
Next
Next
End If[/code]

20 Responses to “一段过滤垃圾信息的代码!”

  1. 按下快乐键 Says:

    看起来不错,用用先~~

  2. 按下快乐键 Says:

    出错了,把上面的代码放到const.asp的最后面了,代码都在BLOG的最上面显示出来了。
    把段代码前加上< %,后面加上%>,BLOG的最上面不显示代码了。
    就是在留言时候输入“彩 铃”,提交后就出现乱码页面:
    瀵逛笉璧蜂綘鎻愪氦鐨勫瓧娈典腑鏈夎绠$悊鍛樺垪鍏ラ粦鍚嶅崟鐨勫叧閿瓧

  3. 按下快乐键 Says:

    彩铃

  4. 番茄红了 Says:

    晕死了,既然是ASP代码当然要放到< %%>中了!
    我没有过滤彩铃,别测试这个关键字了~

  5. niuhuifei Says:

    紧急求助啊,出现http://www.91fei.net/blog/article.asp?id=24里的垃圾信息怎么办,好像是一个小时会自动添加的,烦死了!急啊。

  6. 番茄红了 Says:

    [quote=niuhuifei]紧急求助啊,出现http://www.91fei.net/blog/article.asp?id=24里的垃圾信息怎么办,好像是一个小时会自动添加的,烦死了!急啊。
    加上以上的代码,过滤字段中输入该评论作者的IP地址,和发出来的一些域名,另外如果

    用处不大的话也一起给过滤掉。

  7. niuhuifei Says:

    现在是他的名字和IP 是不断变化的啊?谢谢啦

  8. 按下快乐键 Says:

    番茄红了,乱码,还是乱码,就在你这里留言时输入你已经避屏了的关键字,提交后就出现下面的乱码:瀵逛笉璧蜂綘鎻愪氦鐨勫瓧娈典腑鏈夎绠$悊鍛樺垪鍏ラ粦鍚嶅崟鐨勫叧閿瓧。
    你可以测试一下。

  9. 地下呼唤者 Says:

    有的域名是us,ru的也可以吗?

  10. 番茄红了 Says:

    [quote=按下快乐键]番茄红了,乱码,还是乱码,就在你这里留言时输入你已经避屏了的关键字…估计你的代码放置的位置不正确!换个编码方式就没关系了。
    [quote=地下呼唤者]有的域名是us,ru的也可以吗?任何域名和字符都是一样的效果

  11. 地下呼唤者 Says:

    把代码放在const.asp文件最后的%>前
    而且把编码改为UTF-8
    但还是显示代码
    在番茄你的站上输入你屏蔽的关键字也是显示乱码
    不知道是什么原因
    能指点下吗?

  12. 地下呼唤者 Says:

    [quote=地下呼唤者]但还是显示代码
    是乱码
    打错字了

  13. 按下快乐键 Says:

    番茄,发现好多人要这个代码,我把你的代码发到论坛上去了,如果不合适,我立即去删除!请指示
    文章地址:http://bbs.pjhome.net/viewthread.php?tid=2823&extra=page%3D1

  14. 番茄红了 Says:

    呵呵,发吧,只是我比较懒罢了~

  15. doomchan Says:

    能不能加入“正则”??

    例如如果对方“彩 铃” “彩 铃”,那就麻烦了

  16. jewel Says:

    UP

  17. 十三 Says:

    test下sina.com

  18. siyizhu Says:

    到http://siyizhu.com/weblog/article.asp?id=640运行代码,把你的那句”对不起你提交的字段中有被管理员列入黑名单的关键字”
    粘贴进去点转换,把得到的字符复制到刚才那里覆盖就OK

  19. 修理工 Says:

    谢谢,一用就灵

  20. wycz Says:

    谢谢,请问最新版的pjblog需要加吗?

发页文章评论

Theme Brought to you by Directory Journal and Elegant Directory