寫了個正規表示式匹配的東西,用到的也就這幾個函數了
複製程式碼如下:<%
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>
關於具體的正規表示式函數