Question

asp过滤所有的html代码函数

想请教大家一下，我在做内容展示页时，对关键词进行描述是这样设置的
<meta name="description" content="<%=(left(rs("nr"),50))%>...">（读取内容前面的50个字符，不知道大家还有没有更好的办法来获取前面50个，有的话希望能多提供几种方法），而获取这50个字符的时候前面有时候会带有html的代码，我使用了过滤的函数来实现，以下是我用的函数：<%
function replaceHTML(str)
dim regEx
set regEx=New RegExp
regEx.Ignorecase=True
regEx.Global=True
regEx.Multiline=True
regEx.Pattern="<[\/]?\w+[^>]*>"
str=regEx.Replace(str,"")
replaceHTML=str
set regEx=nothing
End function
%>但是这段函数却只能对简单的html代码进行过滤，一旦碰到<table><img><div><span>等就过滤不掉了顶多只能过滤掉一些<P><br>这几个简单的，还忘高手们能够给予更好的办法过滤，谢过！

Answer 1

应该是可以过掉所有的标签的.大小写已经忽略,全局已经打开,多行也打开着,看了一下你的匹配式也是正确的啊.你过不掉的可能是因为中间有空间,而[^>]表示的是不包含>的所有字符.怎么会过滤不掉呢?

"<[\/]?\w+(\s+\w+\=[\"]?\w+[\"]?)*[\/]?>"
这样试试如何

Answer 2

Function FilterHTML(strToFilter)
Dim strTemp
strTemp = strToFilter
set re=New regexp
re.pattern="<.*?>"
re.global=true
re.Ignorecase=true
re.Multiline=true
strTemp=re.replace(strtemp,"")
FilterHTML= strTemp
End Function