有时候，有时候，我会会选择留恋不放手，等到风景都看透，也许你会陪我看细水长流。世上再美的风景，都不及回家的那段路。
今天在改一套b2b的电子商务系统时，发现ASP正则，虽然用ASP很久了，但从来没用过正则表达式，这套系统中有个正则的函数很不错，自己看吧。
<%
FunctionRegExpTest(patrn,strng)
DimregEx,Match,Matches'建立变量。
SetregEx=NewRegExp'建立正则表达式。
regEx.Pattern=patrn'设置模式。
regEx.IgnoreCase=False'设置是否区分字符大小写。
regEx.Global=True'设置全局可用性。
SetMatches=regEx.Execute(strng)'执行搜索。
ForEachMatchInMatches'遍历匹配集合。
OnErrorResumeNext
RetStr=RetStr&Match.Value&"|"
Next
RegExpTest=RetStr
EndFunction str="我来自#5565#哈哈"
strInfo=RegExpTest("#\w+(\((\b[,0-9]+\b)?\))?#",str)
Response.Write(strInfo)
%>
再看一例：
FunctionnoHtml(str)
Dimre
Setre=NewRegExp
re.IgnoreCase=True
re.Global=True
re.Pattern="(\&;.*?\&;)"
str=re.Replace(str,"")
re.Pattern="(\&;\/.*?\&;)"
str=re.Replace(str,"")
noHtml=str
EndFunction
以上就是[asp]中的正则表达式运用代码。生活不可能一帆风顺，总会有波折，总会有险阻，生活是个爱开玩笑的孩子，也许今天给你所有，明天又会让你一无所有，无需烦恼，该来的总会来，再黑的夜晚也会有黎明到来的那一刻，不管生活有多么曲折，只要拥有幸福的态度就能挺过漫漫长夜，就能迎来美好的明天。更多关于[asp]中的正则表达式运用代码请关注haodaima.com其它相关文章！
