木子屋
 

标题: ASP一个常用的自定义替换函数

作者: admin

日期: 2006-06-27 04:53 PM

分类: Web编程

内容: <%
Function myReplace(myString)'
    myString=Replace(myString,"&","&amp;amp;")         '替换&为字符实体&amp;amp;
    myString=Replace(myString,"<","&amp;lt;")          '替换<为字符实体&amp;lt;
    myString=Replace(myString,">","&amp;gt;")          '替换>为字符实体&amp;gt;
    myString=Replace(myString,chr(13),"<br>")      '替换回车符为换行标记<br>  
    myString=Replace(myString,chr(32),"&amp;nbsp;")    '替换空格符为字符实体&amp;nbsp;
    myString=Replace(myString,chr(9),"&amp;nbsp;&amp;nbsp;&amp;nbsp;&amp;nbsp;")     '替换Tab缩进符为
    myString=Replace(myString,chr(39),"&amp;acute;")   '替换单引号为字符实体&amp;acute;
    myString=Replace(myString,chr(34),"&amp;quot;")    '替换双引号为字符实体&amp;quot;
    myReplace=myString                             '返回函数值
End Function
%>

+ 查看当前日志评论 (1)

 

登录

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.047 ms

标题: ASP一个常用的自定义替换函数

你没有权限发表评论

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.047 ms

暂无评论

返回

────────────

木子屋

PJBlog3 v3.2.9.518 Inside.

Processed In 0.047 ms