简单过滤一下广告的代码
摘要：好些人跟我要这段东西，其实是个很简单的代码，下边就是，自己拿去改成函数调用就可dimstrA,strB,isOKstrA="test,you...
好些人跟我要这段东西，其实是个很简单的代码，下边就是，自己拿去改成函数调用就可
dimstrA,strB,isOK
strA="test,you,fuck,money"'需要过滤的关键字内容
strB="fasfaefwTestfajkewhfwiTuckjfksajfheyou"'待检查的内容
isOK=False'判断是否含有待过滤内容，如果返回True即为含有，False就是没有
dimRegExp
setRegExp=newRegExp
RegExp.IgnoreCase=False
RegExp.Global=True
dimi,j
j=ubound(split(strA,","))
fori=0toj
RegExp.Pattern="("&split(strA,",")(i)&")"
if(RegExp.Test(strB))then
isOK=True
exitfor
endif
next
setRegExp=Nothing
response.write(isOK)
【简单过滤一下广告的代码】相关文章：
★ ASP辅助代码
★ 用ASP VBS xmlhttp adodbstream下载和保存图片的代码
上一篇：
另类的文件上传解决方案
下一篇：
水印测试(重新测试)