asp將中文漢字字符轉為unicode編碼(\u編碼)與把unicode編碼轉為漢字
網絡 2019/4/16 11:19:50 深山行者 字體:
大 中 小 瀏覽 10378
<%
dim zhuan_text
zhuan_text = "深山工作室"
%>
要轉換的內容：<%=zhuan_text%><br />
轉換之后的代碼：<%=tounicode(zhuan_text)%><br />
轉碼之后的文字：<%=unicodeto("\\u6df1\u5c71\u5de5\u4f5c\u5ba4")%><br />
<%
function tounicode(str) '中文轉unicode
tounicode=""
dim i
for i=1 to len(str)
'asc函數：返回字符串的第一個字母對應的ANSI字符代碼
'AscW函數：返回每一個GB編碼文字的Unicode字符代碼
'hex函數：返回表示十六進制數字值的字符串
tounicode=tounicode & "\u" & LCase(Right("0000" & Cstr(hex(AscW(mid(str,i,1)))),4))
next
end function
'\u6df1\u5c71\u5de5\u4f5c\u5ba4
function unicodeto(str) 'unicode轉中文
str=replace(str,"\u","")
unicodeto=""
dim i
for i=1 to len(str) step 4
'cint函數：將Variant類型強制轉換成int類型
'chr函數：返回數值對應的ANSI編碼字符
'ChrW函數：返回數值對應的Unicode編碼字符
unicodeto=unicodeto & ChrW(cint("&H" & mid(str,i,4)))
next
end function
%>
- 相關閱讀
- DW設置之后更好用 DreamweaverCS編輯GB2312與UTF-8文件在代碼視圖中點擊鼠標錯位問題的解決辦法
- 深山留言板(激情圣誕集合五套模板)v4.4
- ASP FSO讀取XX文件夾下的所有文件列表
- 一個不錯的分頁效果
- 一張背景實現自適應九宮格
- 北京順義阿來電腦科技有限公司電腦配件在線網店
- JS壓縮
- 劉瀏家俱
- 共有0條關于《asp將中文漢字字符轉為unicode編碼(\u編碼)與把unicode編碼轉為漢字》的評論
- 發表評論
蘇公網安備 32070502010230號