非法关键词过滤程序

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


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

收藏 】 【 打印 】   
您可对文档进行评分哟~

勾选遇到的问题提交给我们,收到反馈后保证及时修正更新!

提交反馈需要先登陆会员帐号

上一篇:我的邮箱不能接收国外的邮件,国内的可以接收,请解决!
下一篇:用PHP在线发送邮件的例子!
若文档内容对您没有帮助,不能解决问题? 您还可以 咨询在线客服提交工单搜索常见问题 ,我们将竭诚为您服务。
  >> 相关文章
 
分享至:
Top

24小时客服热线

400-626-0723

  • 售前咨询请拨4
  • 售后服务请拨5
  • 技术支持请拨7
  • 投诉建议请拨9
  • 备案问题请提交工单

咨询售后问题请先打开 电话助手