str="adfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfkadfjlmnnzlkjlkfjoj <img src=""http://www.baidu.com/logo.gif"" border=0 width=100>dfkjhdjfk"
'匹配字符串的所有图片的正则表达式
Set Re=new Regexp
Re.ignorecase=true
Re.global=true
Re.pattern="<img [^>]*src=""([^"">]+)""[^>]+>"
set m=Re.execute(str) '执行并返回一个图片数组
For Each n In m
result=result&n&"|"
result1=result1&n.submatches(0)&"|"
next
set M=nothing
set Re=nothing
本文介绍了一种使用正则表达式从HTML文本中提取图片URL的方法,并提供了具体的VBScript实现示例。
490

被折叠的 条评论
为什么被折叠?



