convert.asp

来自「人民医院眼科全站」· ASP 代码 · 共 12 行

<%
function convert(str)
    str=replace(str,"'","’")
    str=replace(str,"""","&quot;")
    str=replace(str," ","&nbsp;")
    str=replace(str,"<","&lt;")
    str=replace(str," ","&gt;")
    str=replace(str,chr(13),"<br>")
    convert=str
End function
%>