修改一下过滤垃圾信息代码!
前面的过滤垃圾信息的代码，显示警告信息时经常为乱码，太难看了，这是由于未加载http头造成的。
修改一下代码，改为使用PJBLOG自定函数showmsg显示，不过这次把代码放到header.asp的第一个[color=Red]%号后面就可以了，代码如下：
[code]Dim GetFlag,ErrorSql,RequestKey,ForI
ErrorSql = “过滤字符||过滤字符”
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
showmsg “警 告!“,”禁止在本站发布垃圾信息!
返回“,”ErrorIcon”,”"
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
showmsg “警 告!“,”禁止在本站发布垃圾信息!
返回“,”ErrorIcon”,”"
End If
Next
Next
End If[/code]
[color=Red]***************************** 补 充 *****************************
发现在header.asp中添加后，无法过滤留言本信息，原因是留言本处理消息的bookaction.asp文件没有加载header.asp，因此还需要在留言本插件目录下的bookaction.asp中加入以上代码，并将showmsg一行改为:
程序代码返回“,”ErrorIcon”,”plugins”
本人将会尽快完成过滤补丁的安装文件以及过滤关键词管理插件。
04月 2nd, 2006 at 14:17:20
番茄
是不是只要把上面的代码放到header.asp的第一个%号后面就可以了？
不需要做修改吧？
const.asp里的代码还需要保留吗？
04月 2nd, 2006 at 14:19:35
const.asp里的代码删除掉就可以了
04月 2nd, 2006 at 14:26:25
HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
技术信息（用于支持人员）
错误类型：
Microsoft VBScript 编译器错误 (0×800A0408)
无效字符
/blog/header.asp, line 11
GetFlag=True
04月 2nd, 2006 at 14:29:12
[quote=地下呼唤者]HTTP 错误 500.100 - 内部服务器错误 - ASP 错误
Internet 信息服务
技术信息（用于支持人员）
错误类型：
Microsoft VBScript 编译器错误 (0×800A0408)
无效字符
/blog/header.asp, line 11
GetFlag=True
显示出错了
我把const.asp里的代码删除后
然后在header.asp的第一个%后加上了上面的代码
代码没做修改
打不开（本地IIS测试）
04月 3rd, 2006 at 12:56:17
就等着番茄的这个插件了，垃圾广告实在是太讨厌了！
04月 3rd, 2006 at 15:36:25
也出现了这个问题
不知道是什么原因
04月 3rd, 2006 at 17:59:17
还是等插件算了
自己修改还是有问题
04月 4th, 2006 at 10:32:57
番茄又有好东西了发布了，好消息啊，等待你插件的完成。
04月 4th, 2006 at 11:07:40
强烈支持，最好能加入正则
04月 4th, 2006 at 18:03:20
大哥,等你呀!!!!!!!!555555555555
我那天天都有垃圾广告,快疯了…
04月 9th, 2006 at 03:17:38
,,,,,加入代码后,BLOG成这样了…
http://www.snow-loving.com.cn/yyhs/default.asp
04月 9th, 2006 at 03:24:23
抱歉,前面是我疏忽..现在没问题了..
05月 2nd, 2006 at 10:07:02
const.asp里我没有加过，用了这个代码显示网页有问题。
05月 2nd, 2006 at 10:26:55
好了，不过不知道这段代码对引用是否有效
05月 4th, 2006 at 02:10:41
[b]PJBLOG自定函数showmsg是怎么定义的？
不是PJBLOG，如何引用这个函数？？？[/b]
06月 14th, 2006 at 00:18:52
这个方法对于清理垃圾引用是否也可以通用呢？？
07月 6th, 2006 at 01:37:51
My comment