你好,欢迎来到电脑编程技巧与维护杂志社! 杂志社简介广告服务读者反馈编程社区  
合订本订阅
 
 
您的位置:技术专栏 / Linux开发
gb2312与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

 

UTF-8转换为Gb2312

function   revertUTF8(szInput){  
  var   x,wch,wch1,wch2,uch="",szRet="";  
  for   (x=0;   x<szInput.length;   x++){  
  if   (szInput.charAt(x)=="%")   {  
  wch   =parseInt(szInput.charAt(++x)   +   szInput.charAt(++x),16);  
  if   (!wch)   {  
  break;  
  }  
  if   (!(wch   &   0x80))   {  
  wch   =   wch;  
  }   else   if   (!(wch   &   0x20)){  
  x++;  
  wch1   =   parseInt(szInput.charAt(++x)   +   szInput.charAt(++x),16);  
  wch     =   (wch   &   0x1F)<<   6;  
  wch1   =   wch1   &   0x3F;  
    wch     =   wch   +   wch1;  
  }     else   {  
  x++;  
  wch1   =   parseInt(szInput.charAt(++x)   +   szInput.charAt(++x),16);  
  x++;  
  wch2   =   parseInt(szInput.charAt(++x)   +   szInput.charAt(++x),16);  
  wch     =   (wch   &   0x0F)<<   12;  
  wch1   =   (wch1   &   0x3F)<<   6;  
  wch2   =   (wch2   &   0x3F);  
  wch     =   wch   +   wch1   +   wch2;  
  }  
  szRet   +=   String.fromCharCode(wch);  
  }   else   {  
  szRet   +=   szInput.charAt(x);  
  }  
  }  
  return(szRet);  
  }  
(编辑:aniston)

  推荐精品文章

·2024年12月目录 
·2024年11月目录 
·2024年10月目录 
·2024年9月目录 
·2024年8月目录 
·2024年7月目录 
·2024年6月目录 
·2024年5月目录 
·2024年4月目录 
·2024年3月目录 
·2024年2月目录 
·2024年1月目录
·2023年12月目录
·2023年11月目录

  联系方式
TEL:010-82561037
Fax: 010-82561614
QQ: 100164630
Mail:gaojian@comprg.com.cn

  友情链接
 
Copyright 2001-2010, www.comprg.com.cn, All Rights Reserved
京ICP备14022230号-1,电话/传真:010-82561037 82561614 ,Mail:gaojian@comprg.com.cn
地址:北京市海淀区远大路20号宝蓝大厦E座704,邮编:100089