宁夏网络公司|宁夏万博体育官方下载万博app最新版|万博manbetx官方下载网络公司|万博manbetx官方下载万博体育官方下载万博app最新版
15595599605 13309518098 QQ: 点击这里给我发消息 点击这里给我发消息 点击这里给我发消息
   
万博体育官方下载首页 | 万博体育官方下载万博app最新版 | 关于我们 | 网络营销 | 常见问题 | 相关知识 | 联系我们 | 客户案例
售前: 15595599605
13309518098
售后: 13014290997
15008617747
QQ:  建站咨询
 建站咨询
 业务受理
 售后服务
套餐类型 一 初级型 2015-02-10
套餐类型 二 经济型 2015-02-10
套餐类型 三 普通型 2015-02-10
套餐类型 四 标准型 2015-02-10
套餐类型 五 行业型 2015-02-10
套餐类型 六 门户型 2015-02-10
您的位置:万博体育官方下载首页>>>asp提取图片地址的代码
asp提取图片地址的代码
作者:万博manbetx官方下载志达四方电子科技有限公司  来源:本站整理  
发布时间:2010-10-31 11:38:56  发布人:志达四方

<%
dim Content
Content="万博manbetx官方下载志达四方电子科技有限公司<IMG height=267 src='http://www.52nx.net/image/logo.jpg' width=400 border=0>是宁夏万博manbetx官方下载地区一家网络公司。"

Str = Content
Set regEx = New RegExp '建立正则表达式。
regEx.Pattern = "(<img)(.[^<>]*)(src=)('|"&CHR(34)&"| )?(.[^'|\s|"&CHR(34)&"]*)(\.)(jpg|gif|png|bmp|jpeg)('|"&CHR(34)&"|\s|>)(.[^>]*)(>)" '设置模式。
regEx.IgnoreCase = True '设置是否区分字符大小写。
regEx.Global = True '设置全局可用性。
Set Matches = regEx.Execute(Str) '执行搜索。

For Each Match in Matches '遍历匹配集合。
'输入图片地址
Response.Write "<img src='"&Match.SubMatches(4)&"."&Match.SubMatches(6)&"'>" '显示图片
Response.Write Match.SubMatches(4)&"."&Match.SubMatches(6)&"<br>" '图片地址
Next
%>

-------------------------------------------------------------------------------------------------

业务范围:万博体育官方下载万博app最新版 网页设计 万博体育官方下载制作 网页制作 手机万博体育官方下载 微信万博体育官方下载

编辑:【万博manbetx官方下载志达四方电子科技有限公司】录入:【万博体育官方下载万博app最新版部】

】 【返回】 【打印】 【关闭

     
营业执照 组织机构 税务登记 安全万博体育官方下载
万博manbetx官方下载志达四方电子科技有限公司
业务电话:15595599605 13309518098
客服热线:13014290997 15008617747
地址:万博manbetx官方下载市金凤区康平路悦海新天地购物广场
E-mail:49773161@qq.com
在线客服:点击这里给我发消息 点击这里给我发消息 点击这里给我发消息
版权所有 © 2015 万博manbetx官方下载志达四方电子科技有限公司 宁ICP备05000522号  宁公网安备 64010602000041号