网络编程
位置:首页>> 网络编程>> Asp编程>> ASP写的汉字转换为UTF-8的一段代码

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

  发布时间:2009-07-05 18:49:00 

标签:UTF-8,汉字,转换

汉字转换为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


 

0
投稿

猜你喜欢

手机版 网络编程 asp之家 www.aspxhome.com