当前位置: 首页 > 图文教程 > 网络编程 > ASP > ASP常用函数:HTMLDecode

ASP
ASP实用大全-ASP服务器组件(4)
ASP实用大全-ASP服务器组件(5)
ASP实用大全-ASP服务器组件(6)
ASP实用大全-ASP服务器组件(7)
ASP 3.0高级编程(一)
ASP 3.0高级编程(二)
ASP 3.0高级编程(三)
ASP 3.0高级编程(四)
ASP 3.0高级编程(五)
ASP 3.0高级编程(六)
Asp Object 之:AddHeader
Asp Object 之:AppendToLog
Asp Object 之:BinaryRead
Asp Object 之:BinaryWrite
Asp Object 之:Buffer
Asp Object 之:CacheControl
Asp Object 之:Charset
Asp Object 之:Clear
Asp Object 之:ClientCertificate
Asp Object 之:ContentType

ASP常用函数:HTMLDecode


出处:互联网   整理: 软晨网(RuanChen.com)   发布: 2009-09-13   浏览: 263 ::
收藏到网摘: n/a

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