ASP是使用正則提取內(nèi)容里所有圖片路徑SRC的實(shí)現(xiàn)代碼
更新時(shí)間：2019年09月28日 11:05:50 投稿：mdxy-dxy
有時(shí)候客戶提交的內(nèi)容里包含多個(gè)圖片，客戶想單獨(dú)把圖片路徑提取出來(lái)進(jìn)行保存，下面腳本之家小編跟大家分享ASP正則提取內(nèi)容里所有圖片路徑SRC的方法函數(shù),需要的朋友可以參考下
函數(shù)
Function RegImg(TheStr) Dim RegEx Set RegEx = New RegExp '建立正則表達(dá)對(duì)象。 RegEx.IgnoreCase =True ' 是否區(qū)分大小寫(xiě)，True為不區(qū)分且默認(rèn) RegEx.Global = True '全部匹配還是只匹配第一個(gè) RegEx.Pattern = "<img[^>]*src\s*=\s*['"&CHR(34)&"]?([\w/\-\:.]*)['"&CHR(34)&"]?[^>]*>" ' 搜索所使用的正則表達(dá)式 If Regex.test(TheStr) Then ' 判斷是否有匹配值，返回True或者False。不受Global屬性影響。 Dim Matches Set Matches = RegEx.Execute(TheStr) ' 執(zhí)行搜索。Execute 方法返回一個(gè)Matches 集合，其中包含了在 TheStr 中找到的每一個(gè)匹配的 Match 對(duì)象。如果未找到匹配，Execute 將返回空的 Matches 集合。 For Each Match in Matches ' 遍歷匹配集合。 'RetStr = RetStr & Match.Value & "<br />" '獲取整個(gè)img RetStr = RetStr & Match.SubMatches(0)&"||" '只取src Next RegImg = RetStr End If End Function
'調(diào)用方法
htmlBody="<img id='img' src='/images/01.jpg' alt='圖片標(biāo)題' style='border:none;position:relative;' /><img src='/111.jpg' /><img src='/222.jpg' />"
Response.Write RegImg(htmlBody)
到這里就為拿出了，大家可以根據(jù)需要修改。
相關(guān)文章
jb51生成所有頁(yè)面的效果+分頁(yè)生成...2006-08-08
檢測(cè)是否為中文字符2009-02-02
在JScript中使用緩存技術(shù)的實(shí)際代碼
在編寫(xiě)ASP程序時(shí)，通常為了提高ASP程序的運(yùn)行效率及減少對(duì)數(shù)據(jù)庫(kù)的連接和查詢，會(huì)使用緩存技術(shù)來(lái)緩存一些需要從數(shù)據(jù)庫(kù)讀取的數(shù)據(jù)。而在ASP中實(shí)現(xiàn)緩存的方法常用的就是使用Application對(duì)象。在編寫(xiě)ASP程序時(shí)，我們有兩種語(yǔ)言可以選擇，分別是VBScript和JScript。2008-05-05
最近公司開(kāi)放網(wǎng)站需要用到根據(jù)用戶添加的出生日期得到生肖發(fā)現(xiàn)了這個(gè)函數(shù)。使用起來(lái)不錯(cuò)2008-01-01
ASP控制每頁(yè)打印行數(shù)...2007-09-09
修改文件的名字和修改文件夾的名字的asp代碼2008-11-11
ASP 微信公共平臺(tái)接口實(shí)現(xiàn)代碼
bluedidea看到的ASP 微信公共平臺(tái)接口實(shí)現(xiàn)代碼，需要的朋友可以參考下2014-01-01
JavaScript在ASP頁(yè)面中實(shí)現(xiàn)掩碼文本框效果代碼
在網(wǎng)頁(yè)中輸日期、時(shí)間、IP地址等需要一定的格式限制，否則將會(huì)程序?qū)?huì)很難和程序溝通2012-08-08
取得表單提交的所有數(shù)據(jù)...2006-08-08
看過(guò)的朋友可幫忙頂哦,這些代碼都是第一次發(fā)的,外面很多要不就是很復(fù)雜,看不懂,要不就是不能用的,下面的我寫(xiě)時(shí)候已經(jīng)盡量簡(jiǎn)潔明了2009-02-02