ASP教程:过滤HTML代码并截取

时间:2010-09-04 20:37:17  来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:中的所有字符均替换不显示,作为过滤HTML标签的最终极手法,但该方法对于内容中必须描述有关尖括号内容则是过滤过头了(比如本文起始所引用的相关尖括号符号均将看不见“<>”,文章中用来描述HTML标签“<hr>”也将看不见)。不过,总归是有需要将所有尖括号中内容全部替换的时候。很显然是需要进行正则的。搜索了一段代码
  正文:

正常ASP/ target=_blank class=infotextkey>asp中对录入内容的过滤仅仅是对左尖括号(<)和右尖括号的(>)的HTML源码的替换,以在页面中显示为左右尖括号,而不是将尖括号作为HTML标签执行了。

当然这应该是属于正常过滤手法,而还有一种过滤方法则是将一对尖括号及尖括号中的所有字符均替换不显示,作为过滤HTML标签的最终极手法,但该方法对于内容中必须描述有关尖括号内容则是过滤过头了(比如本文起始所引用的相关尖括号符号均将看不见“<>”,文章中用来描述HTML标签“<hr>”也将看不见)。

不过,总归是有需要将所有尖括号中内容全部替换的时候。很显然是需要进行正则的。搜索了一段代码


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 全部选择 提示:你可先修改部分代码,再按运行]

 

"ASP教程:过滤HTML代码并截取"由第二电脑网原创提供,转载请注明:http://www.002pc.com/master/College/Programming/ASP/9654.html


关于《ASP教程:过滤HTML代码并截取》文章的评论

站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td