【下载文档:  如何保持数据库输出格式不变.txt 】

---

如何保持数据库输出格式不变
如何保持数据库中原有格式不变：这些问题在论坛里面几乎天天有人问~！
其实当在输入信息，然后提交信息的时候，所有内容的格式是没有变的。
只是在当提取数据库的时候，某些特殊的东西需要将它们显示出来：比如空格、比如回车等。
1，先定义一个函数：主要作用是替换特殊字符代码
<%function HTMLEncode(fString) fString = replace(fString, ">", ">") fString = replace(fString, "<", "<") fString = Replace(fString, CHR(32), " ") fString = Replace(fString, CHR(13), "") fString = Replace(fString, CHR(10) & CHR(10), "

") fString = Replace(fString, CHR(10), "
") HTMLEncode = fStringend function%>
2，直接调用该函数
<%=HTMLEncode(rs("content"))%>
============================
下面是一个客户段端演示的例子
function HTMLEncode(fString)
fString = replace(fString, ">", ">")
fString = replace(fString, "<", "<")
fString = Replace(fString, CHR(32), " ")
fString = Replace(fString, CHR(13), "")
fString = Replace(fString, CHR(10) & CHR(10), "")
fString = Replace(fString, CHR(10), "
")
HTMLEncode = fString
end function
function output(str)
out.innerHTML=HTMLEncode(str)
end function
显示
[Ctrl+A 全选 注:如需引入外部Js需刷新才能执行]