怎么过滤所有HTML代码和CSS
来源:爱站网时间:2021-12-10编辑:网友分享
怎么过滤所有HTML代码和CSS,JS?这是最近同事问爱站技术小编的一个问题,小编觉得其实这个问题很简单,用一篇文章就可以解答,我觉得我可以这篇文章可以给大家带来一定的帮助。
Function RemoveHTML(strHTML) '过滤HTML代码的函数包括过滤CSS和JS
StrHtml = Replace(StrHtml,vbCrLf,"")
StrHtml = Replace(StrHtml,Chr(13)&Chr(10),"")
StrHtml = Replace(StrHtml,Chr(13),"")
StrHtml = Replace(StrHtml,Chr(10),"")
StrHtml = Replace(StrHtml," ","")
StrHtml = Replace(StrHtml," ","")
Dim objRegExp, Match, Matches
Set objRegExp = New Regexp
objRegExp.IgnoreCase = True
objRegExp.Global = True
'取闭合的
objRegExp.Pattern = "
以上内容就是爱站技术频道小编为大家分享的怎么过滤所有HTML代码和CSS,看完以上分享之后,大家应该都知道怎么过滤所有HTML代码和CSS了吧。
上一篇:自己学正则时做的笔记,其实正则也不难哦,现在分享给大家
下一篇:正则表达式学习笔记