新微赢技术网

标题: Help me !!waiting ....... [打印本页]

作者: 緣妢_兲紸龍 时间: 2010-1-14 03:14
标题: Help me !!waiting .......
大家好，想请教一个问题：
请问怎么控制Textarea里面字体的格式呢，比如说，如果输入的文本有换行,入库后从库中读出的数据是换行的，空两格从库中读出来的数据是空两格的，请问怎么实现呢？偶先谢过啦 :)

作者: [日青](忝) 时间: 2010-1-14 03:14
输入的时候认为控制（如：回车，分段等）。输出的时候用上下面的格式函数：
<%
Function HTMLcode(fString)
If Not IsNull(fString) Then
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = replace(fString, "&#", "&#")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(9), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), " ")
fString = Replace(fString, CHR(10), " ")
HTMLcode = fString
End if
End Function
%>

作者: 云-飘天涯 时间: 2010-1-14 03:14
如果我从库中读出来的要按格式输出的内容是：
rs("content")是不是用rs("content")取代fString就可以了呀？！

作者: 女人请自重 时间: 2010-1-14 03:14
好像有server.HTMLEncode()吧
用rs("content")=server.HTMLEncode(content)
以后读出来就是了
conn兄不用自己写呀

作者: 蓝血腥人 时间: 2010-1-14 03:14
偶明白了，谢谢两位啦！！

作者: 轻松由我 时间: 2010-1-14 03:14
标题不明一律锁帖

请大家引以为鉴。。。

欢迎光临新微赢技术网 (http://bbs.weiying.cn/)