如何用ASP将一大段文字中的HTML的标识去掉

无敌美少女

<%
Function FilterHTML(strToFilter)
Dim strTemp
strTemp = strToFilter
While I tr(1,strTemp," lt quot;) AND I tr(1, strTemp, " gt quot;)
strTemp = Left(strTemp, I tr(1, strTemp, " lt quot;)-1) &am  Right(strTemp, Len(strTemp)-I tr(1,strTemp, " gt quot;))

WEnd
FilterHTML = strTemp
End Function
%>

betty

好贴就是好贴。。。

鸥飞007

到你的~~贴吧收藏~~~我的发言~`找

林妹妹

楼主，你写得实在是太好了。我惟一能做的，就只有把这个帖子顶上去这件事了。