登录模块加载中...
会员投稿 投稿指南 今天是:
打印本页 | 关闭窗口 | 双击滚屏 您的位置首页>>网页制作学习园地>>ASP教程>>ASP技巧>>ASP正则匹配img标签
ASP正则匹配img标签
来源:不详 ‖ 作者:佚名 ‖ 点击: ‖ 时间:14-02-12 11:07:54 ‖ 【 】‖ 我要投稿
asp/Visual Basic代码:

 程序代码
<%
’***************************************************    
’*函数名 : GetImgFromContent    
’*参数说明 : html 被提取的html 代码    
’*功能简介 : 提取这部分html代码中的图片    
’*程序作者 : evio http://www.backci.cn/code 
’*http://www.knowsky.com/   
’***************************************************    
function GetImgFromContent(html)    
    Dim Re, match, matchs, htm, t    
    htm = ""   
    set Re = new RegExp    
    re.IgnoreCase =True     
    re.Global = True     
    re.Pattern = "]*>" ’--]*>    
    Set matchs = re.Execute(html)    
    for each match in matchs    
        htm = htm + (match.SubMatches(0)) & "|$|"   
    next    
    set matchs = nothing    
    t = split(htm, "|$|")(0)    
    if len(t) = 0 or t = "" then    
        t = "_template_Images/PRive.jpg"   
    end if    
    ze = ""   
end function
%>
加入收藏:  加入收藏夹  | 发送给好友:  发送给好友
责任编辑:admin
相关文章列表
请文明参与讨论,禁止漫骂攻击。  
网友评论