写了个正则表达式匹配的东西，用到的也就这几个函数了复制代码代码如下:
< %
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)
If match.Count > 0 Then
For Each matched in match
Response.Write "< B >< input value=" & matched.Value & " >< /B > 位置: < B >" & matched.FirstIndex & "< /B > 长
度:"&matched.Length&"< BR >"
Next
Else
Response.Write "< B >" & regex.Pattern & "< /B > 没有找到匹配"
End If
Set regex = nothing
% >
< 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 >
关于具体的正则表达式函数