Escribí algo que coincida con expresiones regulares y estas son las únicas funciones que utilicé.
Copie el código de la siguiente manera:<%
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)
Si match.Count > 0 Entonces,
para cada coincidencia en la coincidencia
Response.Write <B><input value= & matched.Value & >>B> Posición: <B> & matched.FirstIndex & </B>
Longitud
:&matched.Length&<BR>Siguiente
Else
Response.Write <B> & regex.Pattern & </B> No se encontró ninguna coincidenciaEnd
If
Set regex = nada
%>
<form método=post >
texto :<br>
<textarea cols=50 filas=10 nombre=str><%=str%></textarea><br>
expresión regular:<nombre de entrada=reg value=<%=reg%>><br>
<input type=submit value=regexp>
</form>
Acerca de funciones de expresión regular específicas