多个连续空格只显示一个 ，回车换行无效 ，查看数据库的值是正确的，但网页显示就是有问题，已经有一解决方案：
<%
Function HTMLEncode(Str )
Str=Replace(Str,"<","<" )
Str=Replace(Str,">",">" )
Str=Replace(Str," "," " )
Str=Replace(Str,Chr(10),"<br>"
HTMLEncode=Str
End Function
%>
加入网页中<html>之上，还是不行，请教哪里出错？
