keepformat.asp

原系统为ASP+ACCESS,现改为 ASP+MSSQL 程序代码和美工几乎没做什么修改

<%
function keepformat(content)
if typename(content)="Null" then
keepformat=""
else
str=replace(content," ","&nbsp;&nbsp;")
keepformat=replace(str,chr(13)+chr(10),"<br>")
end if
end function
%>