主题:  菜鸟的求助

icerain

职务:普通成员
等级:1
金币:1.0
发贴:249
#12005/9/28 18:33:56
我想在一个多行的textarea 中输入一些文字,存在ACCESS里,可是输出的时候没有换行了

请问怎么实在textarea 中显示与《%=RS("textarea "%》后一样是换行的文字呀?

就像论坛发表文章这样的。我看过源码,好多UBB的东西啊,真是一点看不明白。我不要那么复杂的功能,怎么简单的实现这样的效果呀?


请各位高手指点一二啊~给个网址教程也好



蓝鲸

职务:版主
等级:5
金币:42.1
发贴:2614
#22005/9/29 2:54:27
文本框中的回车符是chr(13)&chr(10)组成,替换成<br>或<P></p>就行

function HTMLEncode(fString)
    fString = replace(fString, ">", "&gt;")
    fString = replace(fString, "<", "&lt;")

    fString = Replace(fString, CHR(13), "")
    fString = Replace(fString, CHR(10) & CHR(10), "<P></P>")
    fString = Replace(fString, CHR(10), "<BR>")	
	
    HTMLEncode = fString
end function


非常大鱼

icerain

职务:普通成员
等级:1
金币:1.0
发贴:249
#32005/10/4 16:18:29
谢谢版主,我自已调试一下,本人太笨,如果不好使再来请教