过滤所有HTML代码和CSS,JS

2016-02-19 13:58 19 1 收藏

下面图老师小编跟大家分享过滤所有HTML代码和CSS,JS,一起来学习下过程究竟如何进行吧!喜欢就赶紧收藏起来哦~

【 tulaoshi.com - Web开发 】

代码如下:

(本文来源于图老师网站,更多请访问http://www.tulaoshi.com/webkaifa/)
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 = "style(.+?)/style"

'进行匹配

Set Matches = objRegExp.Execute(strHTML)



' 遍历匹配集合,并替换掉匹配的项目

For Each Match in Matches

strHtml=Replace(strHTML,Match.Value,"")

Next


'取闭合的

objRegExp.Pattern = "script(.+?)/script"

'进行匹配

Set Matches = objRegExp.Execute(strHTML)



' 遍历匹配集合,并替换掉匹配的项目

For Each Match in Matches

strHtml=Replace(strHTML,Match.Value,"")

Next


'取闭合的

objRegExp.Pattern = ".+?"

'进行匹配

Set Matches = objRegExp.Execute(strHTML)



' 遍历匹配集合,并替换掉匹配的项目

For Each Match in Matches

strHtml=Replace(strHTML,Match.Value,"")

Next


RemoveHTML=strHTML

Set objRegExp = Nothing

End Function

来源:http://www.tulaoshi.com/n/20160219/1605822.html

延伸阅读
标签: Web开发
我们知道,IE6可能过不了多久就会消失了,但是我们还能继续支持这个浏览器并且避免hack和有约束的CSS吗?这里是10个使用有效的HTML和CSS代码来修正IE6主要问题的方法。 1. 使用DOCTYPE 你应该在一直每个HTML文件的头部都使用DOCTYPE,并且我们推荐使用strict 版本,比如: 1 !DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN&qu...
标签: Web开发
脚注(Footnote)是向用户提供更多信息的一个最佳途径,也是主体信息的一个有效补充,常见于各种印刷书籍中。不过,既然脚注有这些好处,我们当然要在网页中也加以利用,本文向您介绍了用Javascript和CSS实现脚注效果的方法。 Javascript: script type="text/javascript" // 说明:用 Javascript 和 CSS 实现脚注(Footnote)效果 /...
标签: Web开发
随机载入CSS样式的JS效果实际上很好实现,本文的代码如下,具体思路是用一个默认的CSS样式:default.css。另外再用三个其他名称的CSS:skin1.css,skin2.css,skin3.css。当然你可以用更多的样式表,随后在载入时进行随机替换,因为最先载入的default.css样式是直接写在页面上,而JS随机载入的后面CSS文件会覆盖之前的CSS,只要CSS中的元素...
标签: Web开发
曾经为看别人写的杂乱代码而头痛吗?曾经为看BWindow代码而烦恼吗?曾经为减小JS体积和JS的可读性之间的矛盾而左右徘徊吗?最好的办法是有个代码格式化和代码压缩的程序,今天总算有了,它是纯JS编写的,当然也就是开源的了.不好意思,做个广告先:),老早就想写这个代码了,今天总算利用这个周末把它写完了,由于写的仓促,还有些小BUG,请经常注意更新!...
标签: Web开发
解密是很简单的问题,方法: 编写一个a.html,内容如下: textarea name=id_code style='width:100%;height:500'/textarea script language=javascript src=mapbarapi.js/script 修改下载到本地的mapbarapi.js文件,把第316个字符开始的return p修改为id_code.value=p即可,现在浏览器打开a.html就可以看见解密后的JS代码。 由...

经验教程

203

收藏

31
微博分享 QQ分享 QQ空间 手机页面 收藏网站 回到头部