在Z-Blog中屏蔽敏感关键字 - 博客相关 - 分享盒子

分享盒子

关注互联网和软件分享的IT科技平台



« Z-BLOG使用技巧总结云存储 金山快盘 v1.7 »

在Z-Blog中屏蔽敏感关键字


下面是ZBLOG的屏蔽评论中敏感关键字的程序代码,主要用于替换文章评论中的敏感或非法的关键字。

  只需要修改一个文件 c_system_event.asp,将其中的objComment.Content=Request.Form("inpArticle")修改为 objComment.Content=WordFilter(Request.Form("inpArticle"))

  然后在c_system_event.asp文件尾部加入代码:

Function WordFilter(strInput) 
Dim i 
Dim strOutput 
Dim strFilter 
strFilter = Split("关键字1,关键字2,关键字3", ",") 
strOutput = strInput 
For i = 0 To UBound(strFilter) 
strOutput = Replace(strOutput, strFilter(i), String(Len(strFilter(i)), "×")) 
Next 
WordFilter = strOutput 
End Function


原创文章请注明转载自 分享盒子,本文地址:http://www.sqlead.com/post/50.html

发表评论:

◎欢迎参与讨论,请在这里发表您的看法、交流您的观点。

网站分类

最近发表

最新评论及回复

Auto Publisher Copyright 2008-2010. Some Rights Reserved.|