有关换行的问题！

[skyi80]

我输入的时候是用TEXTAREA来输入数据的 ，而且是自动换行的 。可是当我输出的时候，是让数据直接输出到页面上的 ，可是它显示时却不换行。而是一直输出下去，请问这个问题该如何解决啊 。好像用那个SERVER.HTMLENCODE并用REPLACE函数是不行的 ，我已经试过了。谢谢！

[ChinaOk]

<% function htmlencode2(str)
dim result
dim l
if isNULL(str) then
htmlencode2=""
exit function
end if
l=len(str)
result=""
dim i
for i = 1 to l '对返回的内容进行判定,并对其含有<,>,chr(13),chr(34),&,chr(32),chr(9)进行相应的转化,如chr(13)变为<BR> 也就是回车的HTM代码
select case mid(str,i,1)
case "<" result=result+"<"
case ">" result=result+">"
case chr(13) result=result+"<br>"
case chr(34) result=result+"""
case "&" result=result+"&"
case chr(32) result=result'+" "
if i+1<=l and i-1>0 then
if mid(str,i+1,1)=chr(32) or mid(str,i+1,1)=chr(9) or mid(str,i-1,1)=chr(32) or mid(str,i-1,1)=chr(9) then
result=result+" "
else result=result+" "
end if
else result=result+" "
end if
case chr(9) result=result+" "
case else result=result+mid(str,i,1)
end select
next
htmlencode2=result
end function
%>

[ChinaOk]

另外，可以考虑你是不是用的IE5。0
这里的长的字符串好像不能自动换行。

[lovingkiss]

楼上的坑人，这么多乱七八糟的编码，呵呵，一个SERVER.HTMLENCODE就搞定的东西弄这么多。。。，呵呵

自动换行的文本是很难控制的，就算你编码了，也是没有用的，为什么呢，因为那个文本根本没有什么换行符之类的东西，实际上是一行文本；就算SERVER.HTMLENCODE也是无能为力的；
1、用表格：不使用nowrap的表格，宽度固定后就自动换行了，不过有弊病，为什么呢；因为自动换行的表格，是根据完整的一个汉字或者一个完整的单词，不是子母哦换行的，如果你输入了abcdefg....，没有空格，那惨了，还是一行到头的；不过这种情况很少见，毕竟，没有分割的一大串字符没什么大用处；
2、字符字数分割：根据一个汉字、两个字符的原则一定长度加入一个回车，呵呵，没什么问题，就是慢了一点而已，要一个字符一个字符的分析，是否是汉字；
3、超长省略：大于一定字符，显是...

例如：<font title="我爱ChinaOK，但是我想杀了他，和我抢分！">我爱ChinaOK...</font>
显示的时候就没有那么麻烦了，这个，可以自己做个简单的函数处理，判断长度，然后生成....字符

还有其它的方法，你先参考这几种吧

[skyi80]

ChinaOK(授人以鱼，不如授人以渔) ，我试过你的方法了 ，还是换行不得。真不好意思。
lovingkiss(你要答案我要分) ，你所说的，我不是很懂，如果我用一个READONLY 的 TEXTAERA 就可以换行显示，可是我不想这样子，不好看。

[lovingkiss]

所以你用表格呀，用表格控制，一般固定长度就可以了，很少会出现一个长的英文字符串，要是出现了，只能是认倒霉了；我就是这么做的，还没有出现过问题的；

把表格固定宽度后，百分比和象素好像都可以，你试验一下；内部的文本就是自动换行的；别输入abckdealsdjfopwaerfa;ijfpisdfjasdfas;dfasdf9j这样没有空格的啊，它是英文的找空格做分割符的；

[skyi80]

谢谢各位兄弟，不过还是不行。

看来我只好用textarea来显示了。

[wuya0531]

str=server.htmlencode("str")
str=replace(str,chr(10)&chr(13),"<br>")
然后入库
显示不用变，我就这样

[janhance]

很方便的，你是不是想把数据库中东西显示出来
可以用：
response.write "<pre>"
response.write rs("your_record")
response.write "</pre>"
当然你在输入时候，最好到行末按enter换行，否则会拖拉很长的，试试看，我就是这样实现的。

[janhance]

不好意思，我答错了，抱歉！

[funboy88]

msg=server.HTMLEncode(msg)
msg=Replace(msg," "," ")
msg=Replace(msg,chr(13)&chr(10),"<br>")