ITPub博客

首页 > Linux操作系统 > Linux操作系统 > ASP写的汉字转换为UTF-8的一段代码(转)

ASP写的汉字转换为UTF-8的一段代码(转)

原创 Linux操作系统 作者:jcszjswkzhou 时间:2019-02-27 07:36:04 0 删除 编辑
汉字转换为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_unicode
end function

来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/10294527/viewspace-125363/,如需转载,请注明出处,否则将追究法律责任。

请登录后发表评论 登录
全部评论

注册时间:2007-08-29

  • 博文量
    3488
  • 访问量
    2631157