当前位置:  编程技术>其它

过滤所有HTML代码和CSS,JS

    来源: 互联网  发布时间:2014-10-12

    本文导语:  代码如下: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," ",...

代码如下:

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 = ""

 '进行匹配

 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


  '取闭合的

 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


    
 
 

您可能感兴趣的文章:

  • Java实现的文件过滤代码分享(按后辍过滤)
  • php 过滤英文标点符号及过滤中文标点符号代码
  • CodeIgniter框架过滤HTML危险代码
  • asp 正则 过滤重复字符串的代码
  • asp正则过滤重复字符串的代码
  • jquery代码-如何创建嵌套的过滤器
  • 过滤XSS攻击代码 JavaScript XSS
  • HTML恶意代码过滤 AntiSamy
  • jquery代码-如何使用多个属性来进行过滤
  • CodeIgniter框架实例之过滤HTML危险代码
  • 怎么样过滤html代码
  • php中使用array_filter()函数过滤空数组的实现代码
  • php使用正则过滤js脚本代码实例
  • 关于文档过滤器一段代码的问题:
  • 用正则表达式过滤html代码
  • Java 的 FileFilter文件过滤与readline读行操作实例代码
  • php过滤特殊字符sql防注入代码
  • C#实现协同过滤算法的实例代码
  • 在linux环境下,如何罗列服务器的所有IP,并过滤掉127.0.0.1
  • php过滤所有恶意字符(批量过滤post,get敏感数据)
  •  
    本站(WWW.)旨在分享和传播互联网科技相关的资讯和技术,将尽最大努力为读者提供更好的信息聚合和浏览方式。
    本站(WWW.)站内文章除注明原创外,均为转载、整理或搜集自网络。欢迎任何形式的转载,转载请注明出处。












  • 相关文章推荐
  • Python通过正则表达式获取,去除(过滤)或者替换HTML标签的几种方法
  • linux中有哪些技术可以实现包过滤、内容过滤的技术?
  • wireshark抓包后查看数据报时的过滤规则/过滤语法及举例说明
  • c#正则过滤图片标签 asp.net正则过滤的例子
  • Python过滤函数filter()使用自定义函数过滤序列实例
  • mysqldump过滤 mysqlfilter
  • 新浪微博微过滤 WeiGuoLv
  • Web安全过滤 DansGuardian
  • 桌面HTTP过滤器 Privoxy
  • IP 信息包过滤系统 iptables
  • 敏感词过滤软件 网络发言防和谐器
  • 问关于过滤数据包
  • PHP中HTML标签过滤技巧
  • 敏感词过滤服务 bbspam
  • PHP的HTML内容过滤脚本 htmLawed
  • 标签过滤插件 Filtrify
  • 如何在linux进行 包过滤
  • 关于用Libpcap过滤报文
  • linux正侧表达式过滤的问题
  • 在linux下想做一个URL过滤器
  • 邮件过滤框架 spmfilter


  • 站内导航:


    特别声明:169IT网站部分信息来自互联网,如果侵犯您的权利,请及时告知,本站将立即删除!

    ©2012-2021,,E-mail:www_#163.com(请将#改为@)

    浙ICP备11055608号-3