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

By admin in web前端 on 2019年5月21日

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

比如 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
‘示例
web前端,s=”1223445677777778aabbcccccccccc”
response.write Norepeat(s)
%>

<%    
‘过滤重复   
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)    
%> 

复制代码 代码如下: % ‘过滤重复 Functionnorepeat(Str) DimRegEx
IfIsNull(Str)OrStr=””ThenExitFuncti…

发表评论

电子邮件地址不会被公开。 必填项已用*标注

网站地图xml地图
Copyright @ 2010-2019 澳门新葡亰官网app 版权所有