，符合匹配值的asp正规表达式替换

2013-06-25

求一个，符合匹配值的asp正规表达式替换。比如：%Dim aspNameaspName TSR000007776/24接TSR000108979/02

求一个，符合匹配值的asp正规表达式替换。
比如：


<%
Dim aspName
aspName = "TSR000007776/24接TSR000108979/02"
%>

要求替换显示后的 aspName值为：“设备X/24接设备X/02“

其实就是把TSR000007776和TSR000108979替换设备X

哪个高手懂正规表达式，帮我写一下代码。
[解决办法]


Dim aspName
Dim re
aspName = "TSR000007776/24接TSR000108979/02"
Set re = New RegExp
re.Global = True
re.IgnoreCase = True
re.Pattern = "[a-z]{3}\d{9}"
aspName = re.Replace(aspName, "设备X")
Set re = Nothing
Response.Write aspName

热点排行

Bad Request.

ASP

，符合匹配值的asp正规表达式替换