ASP常用函数:HTMLDecode
更新时间:2007年02月07日 00:00:00 作者:
<%
Function HTMLDecode(sText)
Dim I
sText = Replace(sText, "&" , Chr(38))
sText = Replace(sText, """", Chr(34))
sText = Replace(sText, "<" , Chr(60))
sText = Replace(sText, ">" , Chr(62))
sText = Replace(sText, " ", Chr(32))
For I = 1 To 255
sText = Replace(sText, "&#" & I & ";", Chr(I))
Next
HTMLDecode = sText
End Function
%>
Function HTMLDecode(sText)
Dim I
sText = Replace(sText, "&" , Chr(38))
sText = Replace(sText, """", Chr(34))
sText = Replace(sText, "<" , Chr(60))
sText = Replace(sText, ">" , Chr(62))
sText = Replace(sText, " ", Chr(32))
For I = 1 To 255
sText = Replace(sText, "&#" & I & ";", Chr(I))
Next
HTMLDecode = sText
End Function
%>
相关文章
javascript asp教程More About Recordsets
javascript asp教程More About Recordsets...2007-03-03
python array[dict] 某个按照某个key去重
这篇文章主要介绍了python array[dict] 某个按照某个key去重,需要的朋友可以参考下2006-06-06


最新评论