function.asp

来自「旅游管理系统 用ASP+SQL 2」· ASP 代码 · 共 14 行

<%
function mfkiqpl(text)
    aa = replace(text, ">", "&gt;")
    bb = replace(aa, "<", "&lt;")
    cc = Replace(bb, CHR(32), "<I></I>&nbsp;")
    dd = Replace(cc, CHR(9), "&nbsp;")
    ee = Replace(dd, CHR(34), "&quot;")
    ff = Replace(ee, CHR(39), "&#39;")
    gg = Replace(ff, CHR(13), "")
    hh = Replace(gg, CHR(10) & CHR(10), "</P><P> ")
    jj = Replace(hh, CHR(10), "<BR> ")
    mfkiqpl= jj
end function
%>