欧美bbbwbbbw肥妇,免费乱码人妻系列日韩,一级黄片

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)文章

最新評論