放眼望去,水田已被一莲花覆盖,鲜艳的红色水滴随雨水流下,半溶解的花海在彩霞中无边无际地延伸,抬头仰望,之间峥嵘的山峰在山腹间吐出薄薄的春云。
比如 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)
%>
到此这篇关于asp 正则 过滤重复字符串的代码就介绍到这了。不因为好天气而用光自己所有的力气,不因为坏天气而怨天尤人。把一切的不如意归于外界,或是自己,都是这世上最最最傻的行为。更多相关asp 正则 过滤重复字符串的代码内容请查看相关栏目,小编编辑不易,再次感谢大家的支持!