本文共 576 字,大约阅读时间需要 1 分钟。
汉字转换为UTF-8的一段代码终于找到这段代码了,一个ASP写的中文转UTF-8,大家可以试试 function chinese2unicode(Salon) dim i dim Salon_one dim Salon_unicode for i=1 to len(Salon) Salon_one=Mid(Salon,i,1) Salon_unicode=Salon_unicode&chr(38) Salon_unicode=Salon_unicode&chr(35) Salon_unicode=Salon_unicode&chr(120) Salon_unicode=Salon_unicode& Hex(ascw(Salon_one)) Salon_unicode=Salon_unicode&chr(59) next Response.Write Salon_unicodeend function |
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-125363/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/10294527/viewspace-125363/