ASP是利用正则提取内容里所有图片路径SRC的实现

Function RegImg(TheStr)     Dim RegEx     Set RegEx = New RegExp '成立正则表达工具。     RegEx.IgnoreCase =True ' 是否区分巨细写，True为不区分且默认     RegEx.Global = True '全部匹配照旧只匹配第一个      RegEx.Pattern = "<img[^>]*src\s*=\s*['"&CHR(34)&"]?([\w/\-\:.]*)['"&CHR(34)&"]?[^>]*>" ' 搜索所利用的正则表达式     If Regex.test(TheStr) Then  ' 判定是否有匹配值，返回True可能False。不受Global属性影响。         Dim Matches         Set Matches = RegEx.Execute(TheStr) ' 执行搜索。Execute 要领返回一个Matches 荟萃，个中包括了在 TheStr 中找到的每一个匹配的 Match 工具。假如未找到匹配，Execute 将返回空的 Matches 荟萃。         For Each Match in Matches ' 遍历匹配荟萃。         'RetStr = RetStr & Match.Value & "<br />" '获取整个img         RetStr = RetStr & Match.SubMatches(0)&"||" '只取src         Next         RegImg = RetStr     End If            End Function

'挪用要领
htmlBody="<img id='img'  src='/images/01.jpg' alt='图片标题' style='border:none;position:relative;' /><img  src='/111.jpg' /><img  src='/222.jpg' />"
Response.Write RegImg(htmlBody)

到这里就为拿出了，各人可以按照需要修改。