国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > regex > 正文

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

2020-01-20 22:23:31
字體:
來源:轉載
供稿:網(wǎng)友
 
我寫的是這樣:
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

不過有一些過濾不了!而且速度太慢!
發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 英吉沙县| 莎车县| 东至县| 贺兰县| 蕲春县| 郓城县| 江西省| 从江县| 紫云| 民丰县| 陈巴尔虎旗| 西林县| 吴川市| 锡林郭勒盟| 明溪县| 吉木乃县| 原平市| 乌鲁木齐市| 越西县| 庆阳市| 泾川县| 谷城县| 宁城县| 海南省| 岳池县| 宣威市| 内丘县| 阜平县| 宁海县| 鹿泉市| 刚察县| 六枝特区| 宜兰县| 石泉县| 鹤壁市| 上蔡县| 赞皇县| 武宣县| 左云县| 浪卡子县| 吉木乃县|