用asp编写的动态网页中的信息从access中显示格式问题
我用asp编写的动态网页从access中显示的文字(备注字段)格式总是一大串挨着下来,我想按我想要的格式编排,但是怎么弄呢??求教!!请帮忙啊老大,请先看清楚我问的什么好...
我用asp编写的动态网页从access中显示的文字(备注字段)格式总是一大串挨着下来,我想按我想要的格式编排,但是怎么弄呢 ??求教!!
请帮忙啊
老大,请先看清楚我问的什么好不好,别见到一个asp就不负责任的复制一大段话上来...这其中虽然有不少知识,但是并非提问者想要。即使有想要的部分,也想大海捞针一样不好找,希望还是针对提问回答问题的好。谢谢~!! 展开
请帮忙啊
老大,请先看清楚我问的什么好不好,别见到一个asp就不负责任的复制一大段话上来...这其中虽然有不少知识,但是并非提问者想要。即使有想要的部分,也想大海捞针一样不好找,希望还是针对提问回答问题的好。谢谢~!! 展开
18个回答
展开全部
保存前把接收到的文本进行过滤替代
strer=replace(strer,"<","<")
strer=replace(strer,">",">")
strer=replace(strer,CHR(32)," ") '空格
strer=replace(strer,CHR(9)," ") 'table
strer=replace(strer,CHR(39),"'") '单引号
strer=replace(strer,CHR(34),""") '双引号
strer=replace(strer,vbCrLf,"<br>")
显示时,再替代回来就OK了
strer=replace(strer,"<","<")
strer=replace(strer,">",">")
strer=replace(strer,CHR(32)," ") '空格
strer=replace(strer,CHR(9)," ") 'table
strer=replace(strer,CHR(39),"'") '单引号
strer=replace(strer,CHR(34),""") '双引号
strer=replace(strer,vbCrLf,"<br>")
显示时,再替代回来就OK了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
这样,建议你看看一些在线编辑器的原理。
他们的工作原理是,首先提交表单。然后服务器进行处理,加上标记。写入数据库。
当被请求阅读时。服务器首先从数据库调出该数据,然后根据以前做的标记反编译,再发送到客户端。建议你看看动网程序。
他们的工作原理是,首先提交表单。然后服务器进行处理,加上标记。写入数据库。
当被请求阅读时。服务器首先从数据库调出该数据,然后根据以前做的标记反编译,再发送到客户端。建议你看看动网程序。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你想要的是什么格式?
一般格式是靠表格或者div+css控制,然后在表格里读取数据库.
如果是觉得显示字数太多,用left(str,num)控制字数num
一般格式是靠表格或者div+css控制,然后在表格里读取数据库.
如果是觉得显示字数太多,用left(str,num)控制字数num
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
输入数据库内容的时候就需要加入HTML标签
你需要一个文本编辑器才行,网上很多去下载
实在不行教你个笨方法用DW排版好在把你面代码复制提交
数据库里就OK了
你需要一个文本编辑器才行,网上很多去下载
实在不行教你个笨方法用DW排版好在把你面代码复制提交
数据库里就OK了
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Function code_jk(strer)
if strer="" or isnull(strer) then
code_jk="":exit function
end if
strer=replace(strer,"<","<")
strer=replace(strer,">",">")
strer=replace(strer,CHR(32)," ") '空格
strer=replace(strer,CHR(9)," ") 'table
strer=replace(strer,CHR(39),"'") '单引号
strer=replace(strer,CHR(34),""") '双引号
strer=replace(strer,vbCrLf,"<br>")
code_jk=strer
End Function
调用: Response.Write code_jk(Rs("Content"))
if strer="" or isnull(strer) then
code_jk="":exit function
end if
strer=replace(strer,"<","<")
strer=replace(strer,">",">")
strer=replace(strer,CHR(32)," ") '空格
strer=replace(strer,CHR(9)," ") 'table
strer=replace(strer,CHR(39),"'") '单引号
strer=replace(strer,CHR(34),""") '双引号
strer=replace(strer,vbCrLf,"<br>")
code_jk=strer
End Function
调用: Response.Write code_jk(Rs("Content"))
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询