繁體中文当前位置: 首页 > 图文教程 > 网络编程 > ASP > asp 过滤尖括号内所有内容的正则代码
- ASP
- ASP采集入库生成本地文件的几个函数
- 百度小偷
- 使用ASP在IIS创建WEB站点的函数
- 简单过滤一下广告的代码
- 以前写的一个分页存储过程，刚才不小心翻出来的
- 用XMLHTTP来偷东西哈！
- XMLHTTP利用POST发送表单时提交中文的问题
- 动态CSS，换肤技术
- 一段几乎可以让你死机的JS代码
- ASP充分利用Err.Description
- ASP小偷(远程数据获取)程序入门教程
- 一段采集程序代码
- 浅谈自动采集程序及入库
- 在ASP中调用存储过程的几种方法
- 使用类，实现模块化
- 使用模板实现ASP代码与页面分离
- 一个ASP小马
- 如何限制同一用户名同时登陆
- ASP制作在线人数统计实例
- 在线统计代码 application
ASP 中的 asp 过滤尖括号内所有内容的正则代码
出处:互联网 整理: 软晨网（RuanChen.com） 发布: 2009-09-13 浏览: 135 ::
收藏到网摘: n/a
正常ASP中对录入内容的过滤仅仅是对左尖括号和右尖括号的HTML源码的替换，所以在页面中显示为左右尖括号，而不是将尖括号作为HTML标签执行了。
当然这应该属于正常过滤手法，而还有一种过滤HTML标签的最终极手法，则是将一对尖括号及尖括号中的所有字符均替换不显示，该方法对于内容中必须描述有关尖括号内容过滤过头了。
不过，总归是有需要将所有尖括号中内容全部替换的时候，很显然是需要进行正则的，有两种代码，第一种如下：
复制代码 代码如下:
Function nohtml(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="(\<.[^\<]*\>)"
str=re.replace(str,"")
re.Pattern="(\<\/[^\<]*\>)"
str=re.replace(str,"")
nohtml=str
set re=nothing
End Function
第二种：
复制代码 代码如下:
Function nohtml(str)
dim re
Set re=new RegExp
re.IgnoreCase =true
re.Global=True
re.Pattern="<(.[^>]*)>"
str=re.replace(str,"")
nohtml=str
set re=nothing
End Function
简单的应用：
点击运行可以看到效果:
[Ctrl+A 全选 提示:你可先修改部分代码,再按运行]
[Ctrl+A 全选 提示:你可先修改部分代码,再按运行]
评论 (0) All
