佳木斯湛栽影视文化发展公司

主頁 > 知識庫 > asp下實(shí)現(xiàn)對HTML代碼進(jìn)行轉(zhuǎn)換的函數(shù)

asp下實(shí)現(xiàn)對HTML代碼進(jìn)行轉(zhuǎn)換的函數(shù)

熱門標(biāo)簽:電子圍欄 團(tuán)購網(wǎng)站 Linux服務(wù)器 服務(wù)器配置 阿里云 科大訊飛語音識別系統(tǒng) 銀行業(yè)務(wù) Mysql連接數(shù)設(shè)置
%
'******************************
'函數(shù):HTMLEncode(reString)
'參數(shù):reString,待編碼轉(zhuǎn)換處理的字符串
'作者:阿里西西
'日期:2007/7/15
'描述:對HTML代碼進(jìn)行轉(zhuǎn)換
'示例:HTMLEncode("p>歡迎訪問br>阿里西西/p>")
'******************************
Function HTMLEncode(reString)
 Dim Str:Str=reString
 If Not IsNull(Str) Then
  Str = UnCheckStr(Str)
  Str = Replace(Str, "", "")
  Str = Replace(Str, ">", "gt;")
  Str = Replace(Str, "", "lt;")
  Str = Replace(Str, CHR(32), "nbsp;")
     Str = Replace(Str, CHR(9), "nbsp;")
  Str = Replace(Str, CHR(9), "#160;#160;#160;#160;")
  Str = Replace(Str, CHR(34), "quot;")
  Str = Replace(Str, CHR(39), "#39;")
  Str = Replace(Str, CHR(13), "")
  Str = Replace(Str, CHR(10), "br>")
  HTMLEncode = Str
 End If
End Function

'反轉(zhuǎn)換HTML代碼

Function HTMLDecode(reString) 
 Dim Str:Str=reString
 If Not IsNull(Str) Then
  Str = Replace(Str, "", "")
  Str = Replace(Str, "gt;", ">")
  Str = Replace(Str, "lt;", "")
  Str = Replace(Str, "nbsp;", CHR(32))
     Str = Replace(Str, "nbsp;", CHR(9))
  Str = Replace(Str, "#160;#160;#160;#160;", CHR(9))
  Str = Replace(Str, "quot;", CHR(34))
  Str = Replace(Str, "#39;", CHR(39))
  Str = Replace(Str, "", CHR(13))
  Str = Replace(Str, "br>", CHR(10))
  HTMLDecode = Str
 End If
End Function
%>

標(biāo)簽:衢州 廣元 蚌埠 大理 萍鄉(xiāng) 江蘇 衡水 棗莊

巨人網(wǎng)絡(luò)通訊聲明:本文標(biāo)題《asp下實(shí)現(xiàn)對HTML代碼進(jìn)行轉(zhuǎn)換的函數(shù)》,本文關(guān)鍵詞  ;如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問題,煩請?zhí)峁┫嚓P(guān)信息告之我們,我們將及時溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò),涉及言論、版權(quán)與本站無關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼
    • 電話咨詢

    • 400-1100-266
    清水河县| 阳谷县| 克拉玛依市| 阿拉善盟| 绥宁县| 遂川县| 沈阳市| 登封市| 海伦市| 新龙县| 南宁市| 陈巴尔虎旗| 乡城县| 福建省| 忻城县| 建平县| 繁昌县| 龙州县| 阿巴嘎旗| 阳山县| 临潭县| 黄大仙区| 沙坪坝区| 普格县| 余庆县| 凭祥市| 南部县| 泸水县| 尉氏县| 霍邱县| 手机| 封丘县| 呼和浩特市| 盘山县| 神木县| 琼结县| 阿鲁科尔沁旗| 泸西县| 呼图壁县| 察哈| 和田市|