asp正则表达式运用详解

发布时间：2023-10-19 10:38:06 所属栏目：Asp教程来源：

导读：复制代码代码如下:
Dim re
Set re = new RegExp '创建RegExp实例
re.Pattern = "ab+c" '定义正则表达式文字，你可以在这里替换正则表达式
Dim myString
myString = "abcefg" '定义要匹配的字符串，

复制代码代码如下:
Dim re
Set re = new RegExp '创建RegExp实例
re.Pattern = "ab+c" '定义正则表达式文字，你可以在这里替换正则表达式
Dim myString
myString = "abcefg" '定义要匹配的字符串，可以进行替换
Response.write(re.Execute(myString)(0)) '进行匹配测试，并写出结果

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Pattern = "/w+" '定义正则表达式文字
Dim myString
myString = "VBScript version 5.6 provides many new features."
'进行匹配测试，并写出是否匹配成功
If re.Test(myString) Then
Response.write("匹配成功！")
Else
Response.write("匹配不成功！")
End If
%>

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Pattern = "/s" '定义正则表达式文字，这里是匹配空白
Dim myString
myString = "VBScript version 5.6 provides many new features."
myString = re.replace(myString, "-") '用-替换空白，返回替换后的字符串
'写出结果
Response.write(myString)
%>

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Global = True
re.Pattern = "/s" '定义正则表达式文字，这里是匹配空白
Dim myString
myString = "VBScript version 5.6 provides many new features."
myString = re.replace(myString, "-") '用-替换空白，返回替换后的字符串
'写出结果
Response.write(myString)
%>

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Global = True
re.Pattern = "(/w+)-(/w+)" '定义正则表达式模式文字
Dim myString
myString = "flip-flop"
myString = re.replace(myString, "$1-$2")
'$1表示第一个/w+，$2表示第二个/w+，第一个/w+匹配flip，第二个/w+匹配flop，
'所以$1-$2相当于flip-flop
'写出结果
Response.write(myString)
%>

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Global = True
re.Pattern = "(/S+)(/s+)(/S+)" '定义正则表达式模式文字
Dim myString
myString = "flip flop"
myString = re.replace(myString, "$3$2$1")
'$1表示第一个/S+，$3表示第二个/S+，$2表示/s+，
'所以$3$2$1相当于flop flip
'写出结果
Response.write(myString)
%>

复制代码代码如下:
<%
Dim re
Set re = new RegExp '创建RegExp实例
re.Global = True
re.Pattern = "/w+" '定义正则表达式模式文字
Dim myString
myString = "VBScript version 5.6 provides many new features."
Set Matches = re.Execute(myString) '执行搜索，该集合用来保存匹配的结果
'进行匹配测试，并写出结果
'迭代Matches集合
For Each Match in Matches
'写出结果
Response.write(Match.FirstIndex & "-" & (Match.FirstIndex + Match.Length) & " " & Match.Value & "<br />")

（编辑：汽车网）

【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容!