ASP 标签过滤函数

来源:百度知道 编辑:UC知道 时间:2024/06/23 12:36:46
文章内容是rs("a")
我想left(rs("a"),200),实现这样一个内容预览的效果。
可是这样的话就连html标签都被分割开了。容易出现错误和HTML错误。以及失效链接的图片等。
有没有办法过滤所有HTML标签和标签中的部分。并顺便将回车换成空。
先谢谢了。
请将代码写的详细点。比如函数如何使用等。

Function RemoveHTML( strText )
Dim RegEx

Set RegEx = New RegExp

RegEx.Pattern = "<[^>]*>"
RegEx.Global = True

RemoveHTML = RegEx.Replace(strText, "")
End Function
/////////////////////////////////
a="<a href=a.htm>aaa</a>"

response.write RemoveHTML( a )

result :aaa

///////////////////////////////////看的清不

做预览效果,
我觉得用<p>切割成数组,然后你再输出第零号,第几号之前的代码,这样能保留HTML效果
否则把HTML标签都过滤掉了,再弄个LEFT(),就没有HTML效果了,一堆文字在那里,很不美观的