Eu escrevi uma correspondência de expressão regular e essas são as únicas funções que usei.
Copie o código da seguinte forma:<%
str = request(str)
reg = request(reg)
set regex = new RegExp
With regex
.Pattern = reg
.IgnoreCase = False
.Global = True
End With
Set match = regex.Execute(str)
Se match.Count > 0 Então
For Each correspondido na correspondência
Response.Write <B><input value= & matched.Value & </B> Posição: <B> & matched.FirstIndex & </B>
Length
:&matched.Length&<BR>Próximo
Else
Response.Write <B> & regex.Pattern & </B> Nenhuma correspondência encontradaEnd
If
Set regex = nada
%>
<form method=post >
text :<br>
<textarea cols=50 rows=10 name=str><%=str%></textarea><br>
regexp:<input name=reg value=<%=reg%>><br>
<input type=submit value=regexp>
</form>
Sobre funções específicas de expressões regulares