//定义函数
<script language="VBSCRIPT">
<%
Function inHTML(str)
Dim sTemp
sTemp = str
inHTML = ""
If IsNull(sTemp) = True Then
Exit Function
End If
sTemp = Replace(sTemp, "&", "&amp;"
sTemp = Replace(sTemp, "<", "&lt;"
sTemp = Replace(sTemp, ">", "&gt;"
sTemp = Replace(sTemp, Chr(34), "&quot;"
inHTML = sTemp
End Function
%>
</script>

//引用函数
<%=HTMLEncode(intro.Fields.Item("description".value) %>

在TD里用可以，但在TEXTAREA里用又把HTML标签显示出来了。

<form name="form1" method="post" action="admin_intro_topic.asp">
<textarea name="textfield" cols="52" rows="18"><%= inHTML(intro.Fields.Item("description".value) %></textarea>

那在TEXTAREA怎么实现不显示Html标签？

急用！跪地求！