简单过滤一下广告的代码

ttx9n

好些人跟我要这段东西，其实是个很简单的代码，下边就是，自己拿去改成函数调用就可

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)

wqpa63gz

很不错的样子

Alisaliu

sdsadsadsadf

pwseqn1h

建军节建军节建军节建军节

uj9lpc

看看看咋么

uj9lpc ·±нУЪ 2022-11-26 03:05
ХГ

gambling
<a href="https://casinowingames.com/">casino game</a>
casinos
<a href="https://casinowellplay.com/">casino real money</a>
casino online
<a href="https://casinogambiba.com/">slots</a>
casinos
<a href="https://casinoongames.com/">casino games</a>

slots
<a href="https://casinowingames.com/">casinos</a>
casino online
<a href="https://casinowellplay.com/">casino</a>
casinos
<a href="https://casinogambiba.com/">casino</a>
online casino
<a href="https://casinoongames.com/">casino games</a>

УОН 37.139.53.x ·±нУЪ 2022-11-26 03:16
gambling
casino game
casinos

online casino
<a href="https://casinowingames.com/">online casino</a>
casino online
<a href="https://casinowellplay.com/">slots</a>
online casino
<a href="https://casinogambiba.com/">casino games</a>
casinos online
<a href="https://casinoongames.com/">gambling</a>

УОН 37.139.53.x ·±нУЪ 2022-11-26 03:16
gambling
casino game
casinos

casino game
<a href="https://casinowingames.com/">casino games</a>
casino
<a href="https://casinowellplay.com/">casinos</a>
casinos
<a href="https://casinogambiba.com/">online casinos</a>
casino real money
<a href="https://casinoongames.com/">casino</a>

slots
<a href="https://casinowingames.com/">online casinos</a>
online casinos
<a href="https://casinowellplay.com/">casinos</a>
casino
<a href="https://casinogambiba.com/">casino</a>
casinos
<a href="https://casinoongames.com/">casinos</a>