正则表达式轻松消除HTML代码
一、清楚内容中的Javsscript 代码
代码如下：
Function ClearJSCode(originCode)
Dim reg
set reg = New RegExp
reg.Pattern = “<SCRIPT[^<]*</SCRIPT>”
reg.IgnoreCase = True
reg.Global = True
clearJSCode = reg.Replace(originCode, “”)
End Function
二、清除内容中的HTML代码
代码如下：
Function ClearHTMLCode(originCode)
Dim reg
set reg = new RegExp
reg.Pattern = “<[^>]*>”
reg.IgnoreCase = True
reg.Global = True
ClearHTMLCode = reg.Replace(originCode, “”)
End Function
现在好多网站的内容都是使用采集程序生成的，使用上边的代码就可以轻松的将内容中的HTML和JS代码清除掉。
转载请注明：代码学堂>编程开发 > 正则学习 > 正则表达式轻松消除HTML代码
1. 本站所有资源来源于用户上传和网络，因此不包含技术服务请大家谅解！如有侵权请邮件联系客服！10210454@qq.com
2. 本站不保证所提供所有下载的资源的准确性、安全性和完整性，资源仅供下载学习之用！如有链接无法下载、失效或广告，请联系客服处理，有奖励！
3. 您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容资源！如用于商业或者非法用途，与本站无关，一切后果请用户自负！
4. 如果您也有好的资源或教程，您可以投稿发布，成功分享后有RB奖励和额外RMB收入！
磊宇堂正在使用的服务器 维护管理由磊宇云服务器提供支持
磊宇堂 » 正则表达式轻松消除HTML代码
2. 本站不保证所提供所有下载的资源的准确性、安全性和完整性，资源仅供下载学习之用！如有链接无法下载、失效或广告，请联系客服处理，有奖励！
3. 您必须在下载后的24个小时之内，从您的电脑中彻底删除上述内容资源！如用于商业或者非法用途，与本站无关，一切后果请用户自负！
4. 如果您也有好的资源或教程，您可以投稿发布，成功分享后有RB奖励和额外RMB收入！
磊宇堂正在使用的服务器 维护管理由磊宇云服务器提供支持
磊宇堂 » 正则表达式轻松消除HTML代码
