最新国产好看的视频,伊人天堂AV在线,国产Aaaaaa视频,蜜臀视频在线观看一区,人妻av色图,密臀久久久精品影片,青青视频免费观看毛片,久草在线观看视,国产三级精品色情在线

asp只采集網(wǎng)站可見(jiàn)文本的正則

 更新時(shí)間:2008年08月15日 13:12:39   作者:  
它可以過(guò)慮Js 可以過(guò)濾 CSS 過(guò)濾HTML標(biāo)識(shí),只采集頁(yè)面的可見(jiàn)文本。
 
我寫(xiě)的是這樣:
Function ClearHTMLCode(originCode)
Dim reg
set reg = new RegExp
reg.IgnoreCase = True
reg.Global = True
reg.Pattern = "(<s+cript(.+?)<\/s+cript>)"
originCode= reg.Replace(originCode, "")
reg.Pattern = "(<s+tyle(.+?)<\/s+tyle>)"
originCode= reg.Replace(originCode, "")
reg.Pattern = "<[^>]*>"
originCode= reg.Replace(originCode, "")
ClearHTMLCode = originCode
End Function

不過(guò)有一些過(guò)濾不了!而且速度太慢!

相關(guān)文章

最新評(píng)論

清水河县| 康保县| 西峡县| 古交市| 呼和浩特市| 馆陶县| 东海县| 葫芦岛市| 广昌县| 高邮市| 安国市| 边坝县| 梓潼县| 思南县| 信丰县| 克什克腾旗| 杨浦区| 马公市| 临湘市| 灌阳县| 衡阳县| 读书| 辉南县| 临夏县| 黔江区| 故城县| 和平县| 台东县| 屏南县| 独山县| 万全县| 禹城市| 浑源县| 广丰县| 巧家县| 永年县| 嵊泗县| 潮州市| 临夏县| 吉林市| 长丰县|