使用方法：把以下代码存为 getImages.html ，后运行便可看到效果。

<br /> <script language = vbs><br /> Str = "<img src=""123.Gif"" alt=""dsddfsa"" >     <img src=""123.jpG"" > <img src=""123.jpg""><IMG SRC=123.JPG>"<br /> '使用方法：把这个文件存为getImages.vbs,然后运行便可看到效果</p> <p>Function getImages(Str)<br />       Set re = New RegExp<br />       re.Pattern = "<img(.+?)src=""*([^\s]+?)""*(\s|>)"<br />       re.Global = True<br />       re.IgnoreCase = True<br />       Set Contents = re.Execute(Str)<br />       For Each Match in Contents ' 遍历匹配集合。<br />           Images = Images + Match.SubMatches(1) + "|"<br />       Next<br />       getImages = Mid(Images, 1, Len(Images) -1)<br /> End Function</p> <p>MsgBox(getImages(Str))<br /> </script><br />