日期:2014-05-16 浏览次数:21395 次
<%
Dim aspName
aspName = "TSR000007776/24接TSR000108979/02"
%>
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