非法关键词过滤程序

<%
'将以下内容添加您的论坛或者留言板的提交程序上进行过滤处理。

'请根据您留言板或者论坛提交页面的输入框字段进行设置
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
%>

编辑：west263
日期：2005-12-16

【收藏】【打印】

非法关键词过滤程序

客服热线

400-028-****

24小时客服热线

我的购物车

新用户

新人专享优惠

您好，

非法关键词过滤程序

客服热线

400-028-****

24小时客服热线