asp正则过滤重复字符串的代码

327 阅读 0 评论 216 点赞

我是靠谱客的博主感性春天，这篇文章主要介绍asp正则过滤重复字符串的代码，现在分享给大家，希望可以做个参考。

比如 1223445677777778aabbcccccccccc 经过过滤之后就是12345678abc

复制代码代码如下:

<%     
'过滤重复    
Function norepeat(Str)     
Dim RegEx     
If IsNull(Str) Or Str="" Then Exit Function    
Set RegEx=New RegExp     
    RegEx.Global = True    
    RegEx.IgnoreCase=True    
    RegEx.MultiLine = True    
    RegEx.pattern="(.)\1+"    
    str=regEx.replace(str,"$1")     
    Set RegEx=Nothing    
Norepeat=str     
End Function    

'示例     
s="1223445677777778aabbcccccccccc"    

response.write Norepeat(s)     
%> 