'函数名称:regexptest
'参数: strng--》要处理的字符串;patrn--》以|隔开的各种结尾标志如:<br/>|</p>|<br>; patrn2--》要替换成的字符串,也以|隔
开
'作者:柳永法(yongfa365)'blog
'功能:将strng字符串内的以patrn结束的字符后边随机的加上patrn2里的内容
function regexptest(strng, patrn, patrn2)
dim regex, match, matches ' 建立变量。
set regex =new regexp ' 建立正 则表达式。
regex.ignorecase =true' 设置是否区分字符大小写。
regex.global =true' 设置全局可用性。
patrn = split(patrn,"|")
foreach p in patrn
regex.pattern = p ' 设置模式。
strng = regex.replace(strng,"||"& chr(10)& p)
next
strng = split(strng,"||")
foreach e in strng
s = s + e + arrart(patrn2)
next
regexptest = s
endfunction
function arrart(patrn2)
arrarti = split(patrn2,"|")
randomize
arrart = arrarti(cint(ubound(arrarti)* rnd))
endfunction
strng ="111<br/>222</p>333<br/>444</p>555<br>666</p>111"
source = strng
patrn ="<br/>|</p>|<br>"
patrn2 ="www.xiaoshuo8.net|//www.jb51.net/blog|hi.baidu.com/"
words = regexptest(strng, patrn, patrn2)
msgbox(words)
</script>
<script>
document.write "<fieldset><legend>原字符串</legend>"+ source +"</fieldset><br>"
document.write "<fieldset><legend>转换后字符串</legend>"+ words +"</fieldset><br>"
</script>
您可能感兴趣的文章:
如您对本文有疑问或者有任何想说的,请点击进行留言回复,万千网友为您解惑!
网友评论