您所在的位置:小祥子 » 编程 » ASP » 正文

ASP提取文章第一张图片

时间:2015-02-21 编辑:本站 来源:本站原创

有的时候程序自动点好,比如说文章缩略图,可以指定也可以自动获取文章里的第一张图片。

get_frist_pic(文章内容HTML)

function get_frist_pic(byval t0)
 get_frist_pic=""
 if strlen(t0)=0 then exit function
 reg.pattern="<img[^>]+src=""([^"">]+)""[^>]*>"
 set matches=reg.execute(t0)
 if reg.test(t0) then
    get_frist_pic=matches(0).submatches(0)
 end if
end function