精品秘无码一区二区三区老师-精品秘一区二三区免费雷安-精品蜜桃秘一区二区三区-精品蜜桃秘一区二区三区粉嫩-精品蜜桃一区二区三区-精品蜜臀国产aⅴ一区二区三区

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 編輯過