當前位置:首頁 > 建站常識 > 列表

asp 相對(duì),絕對(duì)路徑替換絕對(duì)路徑

點擊:時(shí)間:2016/11/3關鍵詞:asp 相對(duì)路徑
ASP項目開發的(de)時(shí)候,遇到一個(gè)問題,就是文章(zhāng)編輯器添加圖片時(shí),有可(kě)能是絕對(duì)路徑,相對(duì)路徑,或者第三方網站圖片插入。類似這(zhè)樣的(de)/UploadFile/image/20161125/20161125183023552355.jpghttp://www.021jz.

 

ASP項目開發的(de)時(shí)候,遇到一個(gè)問題,就是文章(zhāng)編輯器添加圖片時(shí),有可(kě)能是絕對(duì)路徑,相對(duì)路徑,或者第三方網站圖片插入。類似這(zhè)樣的(de)

/UploadFile/image/20161125/20161125183023552355.jpg
/UploadFile/image/20161125/20161125183023552355.jpg

現在實現的(de)功能是,把相對(duì)路徑改成絕對(duì)路徑,如果是絕對(duì)路徑就不替換。

第一步:第一步先把相對(duì)路徑改成絕對(duì)路徑


function replace_Img(byval str)
'這(zhè)裏使用(yòng)asp正則方法,替換相對(duì)路徑變成絕對(duì)路徑
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

第二步:這(zhè)段代碼解決下(xià)面遇到的(de)問題,就是第一步先把本站網站替換成空的(de),第二步在把多(duō)的(de)網址替換成http://

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

以上是我自己的(de)方法,應該還(hái)有更好的(de)方法…… 

預約建站
免費提供網站優化(huà)
領取關鍵詞