convert.asp

一个功能很全面占用空间的小商城程序,适合个人网上开店使用

<%
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
%>