html标签是一种算是复杂的东西了,我们一般是过滤不了的现在利用正则来操作一下,有需要学习的同学可以参考一下本文章。
代码如下 | |
<% Option Explicit Function stripHTML(strHTML) Dim objRegExp, strOutput objRegExp.IgnoreCase = True 'Replace all HTML tag matches with the empty string 'Replace all < and > with < and > stripHTML = strOutput 'Return the value of strOutput Set objRegExp = Nothing |
使用方法
代码如下 | |
stripHTML(strhtml)就可以了,这样用起来就方便多了 |
时间: 2024-11-02 10:32:28