Question

asp中只读取文字，去掉html代码

<%=left(rs("body"),56)%>
读取一段文字，去掉它所有的html代码！
网上有这段代码：
<% Function RemoveHTML( strText )
nPos1 = InStr(strText, "<")
Do While nPos1 > 0
nPos2 = InStr(nPos1 + 1, strText, ">")
If nPos2 > 0 Then
strText = Left(strText, nPos1 - 1) & Mid(strText, nPos2 + 1)
Else
Exit Do
End If
nPos1 = InStr(strText, "<")
Loop

RemoveHTML = strText
End Function %>

可能否告知这代码怎么用？放在什么位置呢？我是个菜鸟感谢帮忙！

Answer 1

dim body:body=RemoveHTML (rs("body"))
response.write left(body,56)
过滤代码放在上端或下端都可以

Answer 2

<%=left(RemoveHTML(rs("body")),56)%>