UC知道ASP中往备注型字段中提交换行符
来源：百度知道 编辑：UC知道 时间：2024/06/08 06:19:06
rs("msg")是备注型字段
默认的换行符是vbCrlf,这个大家都知道!
例如显示的时候<%=replace(rs("msg"),vbCrlf,"<br>")%>
但这个是通过多行文本框自动生产的!
我想通过直接提交数据,能否实现?
例:
rs("msg")="(换行)你好:(换行)内容"
请问怎么实现?
谢谢你们二位了!
不过我自己解决了!
而且我不要<br>因为如果替换成<br>后,
再对文本框内容进行编辑的时候会出现:
内容内容内容<br>内容内容
这个不是我想要的!
我的解决办法:
rs(msg)="内容"&vbCrlf&"内容" 哈哈,不用加引号就OK了!
默认的换行符是vbCrlf,这个大家都知道!
例如显示的时候<%=replace(rs("msg"),vbCrlf,"<br>")%>
但这个是通过多行文本框自动生产的!
我想通过直接提交数据,能否实现?
例:
rs("msg")="(换行)你好:(换行)内容"
请问怎么实现?
谢谢你们二位了!
不过我自己解决了!
而且我不要<br>因为如果替换成<br>后,
再对文本框内容进行编辑的时候会出现:
内容内容内容<br>内容内容
这个不是我想要的!
我的解决办法:
rs(msg)="内容"&vbCrlf&"内容" 哈哈,不用加引号就OK了!
function dvHTMLEncode(fString)
if not isnull(fString) then
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), "<br>")
fString = Replace(fString, CHR(10) & CHR(10), "</P><P> ")
fString = Replace(fString, CHR(10), "<BR> ")
dvHTMLEncode = fString
end if
end function
这个函数应该能帮你
rs("msg")=replace(request("msg"),vbCrlf,"<br>")