如何获取 ASP 中第一个图像的编码
以下为引用的内容:'把pattern 又修改了下 'code要检测的代码 'http://www.CuoXIn.com/asp.asp 'leixing html 或者ubb 'nopic 代码没有图片时默认值 function toppic(code,leixing,nopic) set regex = new regexp regex.ignorecase = true regex.global = true if leixing = "html" then regex.pattern = "<img(.*?)src/s?/=/s?(/u0022?)([^/u0022//>] )" else regex.pattern = "/[img/]([^/u005B] )“ end if set matches = regex.execute(code) if regex.test(code) then if leixing = "html" then toppic = matches(0).submatches(3) else toppic = matches(0).submatches(0) end if else toppic = nopic end if end function code1 = "<img src=""1.gif"">" pic = toppic(code1,"html","nopic.gif") response.Write pic (编辑:银川站长网) 【声明】本站内容均来自网络,其相关言论仅代表作者个人观点,不代表本站立场。若无意侵犯到您的权利,请及时与联系站长删除相关内容! |