亚洲乱码中文字幕综合,中国熟女仑乱hd,亚洲精品乱拍国产一区二区三区,一本大道卡一卡二卡三乱码全集资源,又粗又黄又硬又爽的免费视频

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

 更新時間:2008年08月15日 13:12:39   作者:  
它可以過慮Js 可以過濾 CSS 過濾HTML標(biāo)識,只采集頁面的可見文本。
 
我寫的是這樣:
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ān)文章

最新評論