回 帖 发 新 帖 刷新版面

主题:文本域回车换行在网页上显示的问题~

在文本域内写一段话,其中包括手动输入的回车换行,然后把这段话保存在ACCESS数据库里面,然后在另外一页把这段话从数据库里面取出来显示到网页上,但是这段话中,之前手动输入过的回车换行就表现不出来了,所有的话都写到一行里面去了,在原来回车的地方变成了一个空格,有什么办法解决吗?

回复列表 (共7个回复)

沙发

replace(nr,Chr(13)&Chr(10),"<BR>")

板凳

<%=replace(trim(rs("tex1")),chr(13)&chr(10),"<br>")%>

3 楼

<%=replace(rs("text1"),vbnewline,"<br>")%>
再试试这个

4 楼

不作任何处理,只需显示:
response.write "<pre>" + rs("text1") + "</pre>"

5 楼

[quote]不作任何处理,只需显示:
response.write "<pre>" + rs("text1") + "</pre>"[/quote]
好查了下 好象<pre>是按原样显示的意思?可惜我当时不知道。。。郁闷
但这个标记FF支持不?一会我去试下,都被FF整怕了~

6 楼

在FireFox浏览器是可以正常显示的。
FireFox浏览器对javascript或是ActiveX的支持比较少

7 楼

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), "&nbsp;")
    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, "&nbsp;", CHR(32))
    HTMLDecode= fString
End Function

我来回复

您尚未登录,请登录后再回复。点此登录或注册