简单过滤一下广告的代码
网络编程 2021-07-05 10:57www.168986.cn编程入门
好些人跟我要这段东西,其实是个很简单的代码,下边就是,自己拿去改成函数调用就可
dim strA,strB,isOK
strA = "test,you,fuck,money" '需要过滤的关键字内容
strB = "fasfaefwTestfajkewhfwiTuckjfksajfheyou" '待检查的内容
isOK = False '判断是否含有待过滤内容,如果返回True即为含有,False就是没有
dim RegExp
set RegExp=new RegExp
RegExp.IgnoreCase =False
RegExp.Global=True
dim i,j
j = ubound(split(strA,","))
for i=0 to j
RegExp.Pattern="("&split(strA,",")(i)&")"
if(RegExp.Test(strB))then
isOK=True
exit for
end if
next
set RegExp=Nothing
response.write(isOK)
dim strA,strB,isOK
strA = "test,you,fuck,money" '需要过滤的关键字内容
strB = "fasfaefwTestfajkewhfwiTuckjfksajfheyou" '待检查的内容
isOK = False '判断是否含有待过滤内容,如果返回True即为含有,False就是没有
dim RegExp
set RegExp=new RegExp
RegExp.IgnoreCase =False
RegExp.Global=True
dim i,j
j = ubound(split(strA,","))
for i=0 to j
RegExp.Pattern="("&split(strA,",")(i)&")"
if(RegExp.Test(strB))then
isOK=True
exit for
end if
next
set RegExp=Nothing
response.write(isOK)
上一篇:写了段批量抓取某个列表页的东东
下一篇:另类的文件上传解决方案
编程语言
- socket网络编程 socket网络编程Socket基础
- 少儿编程培训班 少儿编程培训班教学方法
- linux系统编程:Linux系统编程多线程基础
- unix环境高级编程 首发于 UNIX环境高级编程学习之
- 学编程学哪一种比较好 初学者哪种编程语言比较
- 学PLC编程学费多少
- 计算机编程入门 学计算机编程入门的初学指南
- 世界编程语言排行榜
- vba编程培训:Excel VBA编程培训初学者教程
- 少儿编程课程:少儿编程学什么及各年龄段如何
- 游戏编程入门:少儿游戏编程入门的技巧
- 学编程哪个培训机构好 编程培训机构哪个好
- 编程机器人加盟 机器人编程加盟哪家好
- 在线少儿编程机构排名
- 电脑编程入门自学
- 服务器系统下载:服务器系统的安装