首页 相关文章 好东西老外用正则表达式写的HTML分离函数

好东西老外用正则表达式写的HTML分离函数

存成.asp文件,执行,你用ASPHTTP抓内容的时候用这个很爽,当然自己要改进一下了

%
Option Explicit

Function stripHTML(strHTML)
'Strips the HTML tags from strHTML

Dim objRegExp, strOutput
Set objRegExp = New Regexp

objRegExp.IgnoreCase = True
objRegExp.Global = True
objRegExp.Pattern = ".+?"

'Replace all HTML tag matches with the empty string
strOutput = objRegExp.Replace(strHTML, "")

'Replace all and with and
strOutput = Replace(strOutput, "", "")
strOutput = Replace(strOutput, "", "")
[ 查看全文 ]

2016-02-19 标签:

好东西老外用正则表达式写的HTML分离函数的相关文章

手机页面
收藏网站 回到头部