主题:文本域回车换行在网页上显示的问题~
初拥创始者
[专家分:540] 发布于 2007-04-24 13:45:00
在文本域内写一段话,其中包括手动输入的回车换行,然后把这段话保存在ACCESS数据库里面,然后在另外一页把这段话从数据库里面取出来显示到网页上,但是这段话中,之前手动输入过的回车换行就表现不出来了,所有的话都写到一行里面去了,在原来回车的地方变成了一个空格,有什么办法解决吗?
回复列表 (共7个回复)
沙发
yaojp7519 [专家分:600] 发布于 2007-04-24 14:05:00
replace(nr,Chr(13)&Chr(10),"<BR>")
板凳
oyh484203 [专家分:5890] 发布于 2007-04-24 14:17:00
<%=replace(trim(rs("tex1")),chr(13)&chr(10),"<br>")%>
3 楼
wangsdong [专家分:21390] 发布于 2007-04-24 15:54:00
<%=replace(rs("text1"),vbnewline,"<br>")%>
再试试这个
4 楼
notbird [专家分:2800] 发布于 2007-04-25 17:24:00
不作任何处理,只需显示:
response.write "<pre>" + rs("text1") + "</pre>"
5 楼
初拥创始者 [专家分:540] 发布于 2007-04-26 10:28:00
[quote]不作任何处理,只需显示:
response.write "<pre>" + rs("text1") + "</pre>"[/quote]
好查了下 好象<pre>是按原样显示的意思?可惜我当时不知道。。。郁闷
但这个标记FF支持不?一会我去试下,都被FF整怕了~
6 楼
notbird [专家分:2800] 发布于 2007-04-26 14:11:00
在FireFox浏览器是可以正常显示的。
FireFox浏览器对javascript或是ActiveX的支持比较少
7 楼
CharlesKing [专家分:340] 发布于 2007-04-27 10:43:00
Function HTMLEncode(fString) '写入
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P>")
fString = Replace(fString, CHR(10), "<BR>")
fString = Replace(fString, CHR(32), " ")
HTMLEncode = fString
End Function
Function HTMLDecode(fString) '读出到文本框
fString = Replace(fString, "", CHR(13))
fString = Replace(fString, "</P><P>", CHR(10) & CHR(10))
fString = Replace(fString, "<BR>", CHR(10))
fString = Replace(fString, " ", CHR(32))
HTMLDecode= fString
End Function
我来回复