asp 正则表达式替换问题
假如这样一段代码（新闻添加页面）：<P>test<IMG style="WIDTH: 142px; HEIGHT: 118px" height=200 alt="" hspace=0 src="http://test/pic1.jpg" width=200 border=0>test2<IMG style="WIDTH: 119px; HEIGHT: 116px" height=200 alt="" hspace=0 width=200 border=0 src="http://test/pic2.gif" ></P>我想实现：把其中所有的图片（pic1.jpg，pic2.gif，有可能会更多）替换成一张默认图片default.jpg，其他代码不变怎样实现？
参考答案:Set rea = New RegExp :rea.Global = True :rea.IgnoreCase = True :rea.MultiLine = True
Set reb = New RegExp :reb.Global = True :reb.IgnoreCase = True :reb.MultiLine = True
Set rec = New RegExp :rec.Global = True :rec.IgnoreCase = True :rec.MultiLine = True
rea.Pattern = "\<img[^>]*()\>"
reb.Pattern="src=""[^>]*()"""
set matches=rea.execute(str)
for each match in matches
ss=match.value
reb.Pattern="src=[^>]*() "
ss=reb.replace(match.value,"src=aaa.jpg ")
reb.Pattern="src=[^>]*()>"
ss=reb.replace(match.value,"src=aaa.jpg>")
rec.Pattern=match.value
str=rec.replace(str,ss)
next
这种替换方法可能略慢。其中str是要处理的串
你规定文件后缀和文件夹，这个问题好办多了
Set re = New RegExp :re.Global = True :re.IgnoreCase = True :reaMultiLine = True
re.Pattern = "src=\""*http\:\/\/test\/[^>]*()(jpg|gif|bmp|png)\""*"
str=re.replace(str,"src=")