access数据库中如何存储回车符 网页不显示<br>
<%=Server.HTMLEncode((rs3.Fields.Item("content").Value))%>1楼的,不行啊,你这个不好用啊2楼也不行啊,出现这个了...
<%= Server.HTMLEncode((rs3.Fields.Item("content").Value)) %>
1楼的,不行啊,你这个不好用啊
2楼也不行啊,出现这个了
错误类型:
Microsoft VBScript 编译器错误 (0x800A03EE)
缺少 ')'
/top1.asp, line 537, column 96
Response.Write(replace(Server.HTMLEncode((rs3.Fields.Item("content").Value),vbnewline,"<br />"))
可不可以加我QQ一下,帮帮忙 32174320 展开
1楼的,不行啊,你这个不好用啊
2楼也不行啊,出现这个了
错误类型:
Microsoft VBScript 编译器错误 (0x800A03EE)
缺少 ')'
/top1.asp, line 537, column 96
Response.Write(replace(Server.HTMLEncode((rs3.Fields.Item("content").Value),vbnewline,"<br />"))
可不可以加我QQ一下,帮帮忙 32174320 展开
3个回答
展开全部
提取表单时,先将提取数据里的换行标志替换成<br>存储到数据库就可以了,从数据库读取到页面时就不用在从新做编码转换了,直接读取显示在页面上就可以了!
用下面这个函数就可以了!
Function HTMLEncode(fString)
if not isnull(fString) then
fString = Replace(fString, CHR(38), "&")
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(13), "")
'fString = Replace(fString, CHR(10), "<br/>")
HTMLEncode = fString
end if
end Function
用下面这个函数就可以了!
Function HTMLEncode(fString)
if not isnull(fString) then
fString = Replace(fString, CHR(38), "&")
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(39), "'")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(34), """)
fString = Replace(fString, CHR(13), "")
'fString = Replace(fString, CHR(10), "<br/>")
HTMLEncode = fString
end if
end Function
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
replace(Server.HTMLEncode(rs3.Fields.Item("content").Value),vbnewline,"<br />")
sorry .多了个括号..^_^
sorry .多了个括号..^_^
本回答被提问者采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
直接把得到的文本框数据replace
replace(你的到的数据,chr(13),"<br>")
replace(你的到的数据,chr(13),"<br>")
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询