当前位置:首页 开发语言 正文

ASP提取文章中的所有图片

2011年09月10日 | 作者: 米豆网 - 1000seo | 分类: 开发语言 | 

asp程序提取一段内容中的所有图片或者图片地址

<%Function RegImg(TheStr)
    Dim RegEx
    Set RegEx = New RegExp
    RegEx.IgnoreCase =True
    RegEx.Global = True
    RegEx.Pattern = “<img[^>]*src\s*=\s*[‘”&CHR(34)&”]?([\w/\-\:.]*)[‘”&CHR(34)&”]?[^>]*>”
    If Regex.test(TheStr) then
        Dim Matches
        Set Matches = RegEx.Execute(TheStr) ‘ 执行搜索。
        For Each Match in Matches ‘ 遍历匹配集合。
        RetStr = RetStr & Match.Value & “<br />” ‘获取整个img
        RetStr = RetStr & Match.SubMatches(0) ‘只取src
        Next
        RegImg = RetStr
    End If           
End Function%>  
调用方法:

Response.Write RegImg(“<p><img src=”” http://avatar.csdn.net/E/D/9/3_vince6799.jpg”” alt=””vince6799″” />

本文固定链接:http://www.1000seo.com/soft/528
本文章由 米豆网 - 1000seo 于2011年09月10日发布在开发语言分类下,您可以发表评论,并在保留原文地址及作者的情况下引用到你的网站或博客。
+复制链接 转载请注明:ASP提取文章中的所有图片-米豆网
关键字:, ,

好文章就要一起分享!

更多

发表评论

你的大名(必填)

你的邮箱(必填)

你的网站(选填)

评论内容(必填)

😉 😐 😡 😈 🙂 😯 🙁 🙄 😛 😳 😮 mrgreen.png 😆 💡 😀 👿 😥 😎 ➡ 😕 ❓ ❗