我在做时遇到过此类的问题
空格和回车在你读出后你在Html页中是不能显示的
你加入一个过滤函数就可以了
Str=Rs("字段1")
Function Parse(Str)
Dim i,j,k
Dim Char,S,P
j=len(Str)
for i=1 to j
Char=mid(Str,i,1)
if Char=chr(32) then
S=S&" "
else
if Char=chr(13) and (Char=mid(Str,i+1,1))=chr(10) then
S=S&"<br>"
i=i+1
else
if Char=chr(10) then
S=S&"<br>"
else
S=S&Char
end if
end if
end if
next
Parse=S
End function
你试一下