textencode.ini

来自「blog 又搭工」· INI 代码 · 共 15 行

<%
'段落转换
Function textencode(str)
  str=server.htmlencode(str)
  str=replace(str,chr(32),"&nbsp;")
  str=replace(str,chr(13)&chr(10),"<br>")
  textencode=str
End Function
Function text(str)
  'str=server.htmlencode(str)
  str=replace(str,"&nbsp;",chr(32))
  str=replace(str,"<br>",chr(13)&chr(10))
  textencode=str
End Function
%>