Hoje, o editor compartilhará com você um código de anúncio de filtragem simples. Alguns códigos não são muito compreensíveis, e muitos deles estão emprestando outros online.
Muitas pessoas me pediram esse trabalho, mas na verdade é um código muito simples. O seguinte é, basta alterá -lo para uma função chamar a si mesmo.
dim stra, strb, isok
Stra = "Teste, você, foda -se, dinheiro" 'Conteúdo da palavra -chave que precisa ser filtrado
strb = "fasfaefwtestfajkewhfwituckjfksajfheyou" 'conteúdo para ser verificado
ISOK = FALSE 'Apenas determine se o conteúdo a ser filtrado está incluído. Se True for devolvido, ele está incluído. Falso significa que não há
Dim regexp
Definir regexp = novo regexp
Regexp.ignorecase = false
Regexp.global = true
dim i, j
j = ubund (split (stra, ","))
para i = 0 a j
Regexp.pattern = "(" & split (stra, ",") (i) & ")"
if (regexp.test (strb)) então
isok = true
saída para
final se
próximo
Definir regexp = nada
Response.Write (ISOK)
O exposto acima é uma breve introdução aos códigos de publicidade de filtragem. Eu espero que você possa gostar. Para mais conteúdo, continue seguindo o site do Wuxin Technology Channel!