当前位置:首页 > 网站维护 > 列表

asp 相对,绝对路径替换绝对路径

来源:浦一科技点击:时间:2016-11-3 关键词:asp 相对路径
ASP项目开发的时候,遇到一个问题,就是文章编辑器添加图片时,有可能是绝对路径,相对路径,或者第三方网站图片插入。类似这样的/UploadFile/image/20161125/20161125183023552355.jpghttp://www.021jz.

 

ASP项目开发的时候,遇到一个问题,就是文章编辑器添加图片时,有可能是绝对路径,相对路径,或者第三方网站图片插入。类似这样的

/UploadFile/image/20161125/20161125183023552355.jpg
http://www.021jz.com.cn/UploadFile/image/20161125/20161125183023552355.jpg

现在实现的功能是,把相对路径改成绝对路径,如果是绝对路径就不替换。

第一步:第一步先把相对路径改成绝对路径


function replace_Img(byval str)
'这里使用asp正则方法,替换相对路径变成绝对路径
replace_Img=expReplace(str,"<img([^<]*)src=\""([^' ""]+)\""","<img alt="""" src=""http://www.021jz.com.cn$2""")
end function
'正则替换expReplace
'a 替换前字符串
'reg 正则表达式
'c 替换后字符串
Function expReplace(ByVal a,ByVal reg,ByVal c)
Dim regEx, Match, Matches
Set regEx = New RegExp
regEx.Pattern = reg
regEx.IgnoreCase = True
regEx.Global = True
RetStr =regEx.Replace(a, c)
expReplace = RetStr
End Function

第二步:这段代码解决下面遇到的问题,就是第一步先把本站网站替换成空的,第二步在把多的网址替换成http://

response.write replace(replace_Img(replace(str,http://www.021jz.com.cn,"")),"http://www.021jz.com.cnhttp://","http://")

以上是我自己的方法,应该还有更好的方法…… 

服务项目

网站建设

网站建设

通过SEO优化技术,提供更多的展示机会,带来大量精准流量和询盘,每月意向客户增长20%。

手机网站建设

手机网站建设

手机网站的时代强势来袭,赢在全网营销时代,手机+电脑双剑合璧,把握商机滴水不漏。

网站维护

网站维护

一个好的网站需要定期或不定期地更新内容,才能不断地吸引更多的浏览者,增加访问量。

整合网络营销

整合营销

为了建立、维护和传播品牌,以及加强客户关系,而对品牌进行计划、实施和监督的一系列营销

预约建站
免费提供网站优化
领取关键词