ASP常用函数:XMLEncode
摘要:输出RSS和XML时经常用到,和HTMLEncode还不完全一样原理:CharacterConvertedTo""''&&代码
输出RSS和XML时经常用到,和HTMLEncode还不完全一样
原理:
Character |
Converted To |
" | " |
' | ' |
& | & |
< | < |
> | > |
代码
<%
Function XMLEncode(byVal sText)
sText = Replace(sText, "&" , "&")
sText = Replace(sText, "<" , "<")
sText = Replace(sText, ">" , ">")
sText = Replace(sText, "'" , "'")
sText = Replace(sText, """", """)
XMLEncode = sText
End Function
%>
还有个:
<%
Public Function XmlEncode(ByVal strText As String) As String
Dim aryChars() As Variant
aryChars = Array(38, 60, 62, 34, 61, 39)
Dim i As Integer
For i = 0 To UBound(aryChars)
strText = Replace(strText, Chr(aryChars(i)), "";")
Next
XmlEncode = strText
End Function
%>
【ASP常用函数:XMLEncode】相关文章:
★ ASP函数大全
★ ASP常用的函数
上一篇:
ASP常用函数:CLngIP()