ASP 取得文章中第一張圖片
當前位置:點晴教程→知識管理交流
→『 技術文檔交流 』
function getimg(str)[br]dim objregex,zzstr,matches,match,retstr,imglist,imgone,strpath[br]set objregex = new regexp[br]objregex.ignorecase = true[br]objregex.global = true[br]zzstr=""[br]objregex.pattern = zzstr[br]set matches = objregex.execute(str)[br]for each match in matches[br]retstr = retstr &"|"& match.value[br]next[br]if retstr<>"" then[br]imglist=split(retstr,"|")[br]imgone=replace(imglist(1),strpath,"")[br]getimg=imgone[br]else[br]getimg=""[br]end if[br]end function
[p]調用的時候 只需要 <%=getimg(rs("字段"))%>[/p] 該文章在 2010/7/14 1:01:22 編輯過 |
關鍵字查詢
相關文章
正在查詢... |