今天小編跟大家分享一個簡單的過濾廣告代碼，有些代碼小編也不太理解，很多是在網上借鑒其他人的。
好些人跟我要這段東西，其實是個很簡單的代碼，下邊就是，自己拿去改成函數調用就可
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)
以上所述就是分享一個簡單的過濾廣告代碼的介紹，希望大家能夠喜歡，更多內容請繼續關注錯新技術頻道網站！