asp中回车换行符CHR(10)表示换行，CHR(13)表示回车，CHR(32)表示空格

% 
function th(str) 
str=replace(str,"妈的","MD") 
str=replace(str,"靠","KAO") 
th=str 
end function 

function encode(str) 
  str = replace(str, ">", "gt;") 
  str = replace(str, "", "lt;") 
  str = Replace(str, CHR(32), "nbsp;") 
  str = Replace(str, CHR(13), "") 
  str = Replace(str, CHR(10)  CHR(10), "/P>P>") 
  str = Replace(str, CHR(10), "BR>") 
encode=str 
end function 
%>
%title=request.form("title") 
content=request.form("content")%>
文章标题：%=th(title)%>hr> 
文章内容：%=encode(th(content))%> 

!--#include file="https://www.jb51.net/ubb.asp"--> 
% 
function th(str) 
str=replace(str,"妈的","MD") 
str=replace(str,"靠","KAO") 
th=str 
end function 
%>