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)

到这里就为拿出了，大家可以根据需要修改。

声明：本文内容由网友自发贡献，本站不承担相应法律责任。对本内容有异议或投诉，请联系2913721942#qq.com核实处理，我们将尽快回复您，谢谢合作！