非法关键词过滤程序

非法关键词过滤程序如下

折叠ASP/Visual Basic Code复制内容到剪贴板

<%
'将以下内容添加您的论坛或者留言板的提交程序上进行过滤处理。
'请根据您留言板或者论坛提交页面的输入框字段进行设置
GuestBookTitle=trim(Request.Form("Title")) 'Title为留言本输入框的标识名称，根据您的实际情况进行修改。
GuestBookConntent=trim(Request.Form("Content")) 'Content为留言本输入框留言内容字段，根据您的实际情况进行修改。
BadWord="过滤词一@过滤词二"
'以下代码为检测内容是否包含需要屏蔽的字符
'请不要修改
SplitBadWords=split(BadWord,"@")
for each SplitBadWord in SplitBadWords '循环分离出每一个非法字符
if instr(GuestBookTitle,SplitBadWord)<>0 then '判断留言标题是否包含非法字符
Response.Write("对不起，您输入的内容中包含非法字符,禁止提交！")
Response.end()
exit for
end if
if instr(GuestBookConntent,SplitBadWord)<>0 then '判断留言标题是否包含非法字符
Response.Write("对不起，您输入的内容中包含非法字符,禁止提交！")
Response.end()
exit for
end if
next
%>

文章整理：拓步互联--专业提供深圳网站建设、域名注册、虚拟主机、自助建站服务
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!