请问一下，这个VBSCRIPT函数转成javascript怎么写。谢谢

请问VBScript怎么转成JavaScript应该如何写，谢谢
<script language=vbs>
function g5(n)
g5=asc(n)
end function
</script>

解决方案 »

免费领取超大流量手机卡，每月29元包185G流量+100分钟通话, 中国电信官方发货

<script language="javascript">
function g5(n)
{
g5=asc(n);
}
</script>
function g5(n) {
return n.charCodeAt(0);
}
<script language="javascript">
function g5(n)
{
g5=asc(n);
}
</script>
function g5(n)
{
g5=n.charCodeAt(0);
}
改了这个好像也不对。
下面帖出全文件，希望有朋友可以帮忙看看，在网上下载的例子，但是里面用到javascript又用到vbscript。vbscript的代码只能用于IE，所以都不用考滤
index.html文件：
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<title>17414.com 汉字批量转拼音-工具</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<LINK href="css/css.css" type=text/css rel=stylesheet>
</head>
<script language="javascript" type="text/javascript" src="images/Word_Spell.js"></script>
<body>
<div id=B>
<script language=vbs>
function g5(n)
g5=asc(n)
end function
</script>
<div id="R">  <div align="center" class="STYLE3"> <h1>“汉字批量转拼音” 工具</h1>
  </div>
  <table border="0" align="center" cellspacing="0">
    <tr>
      <td colspan="4"  class="name" align="center">可一次输入多个词,快速转换成拼音</td>
    </tr>
    <tr >
      <td colspan="4" class="namecont"><table width="100%" border="0">
        <tr>
          <td><div style="font-weight:bold;">输入中文(可<span class="STYLE2">批量</span>转换)</div>
  <div><textarea name="af1" cols="15" rows="15" id="af1"></textarea>
  </div> </td>
          <td><input type=button value="复制" onclick=af1.select();document.execCommand("Copy") class="submit">
            <br>
            <br>
            <input type=button value="粘贴" onclick=af1.value+=Paste3() class="submit">
            <br>
            <br>
            <input type=button value="清除" onclick='af1.value=""' class="submit">
            <br>
            <br>
            <input id="Ianse_Com_Button" type=button onClick="if (af1.value==' '){M('请输入需要转换成拼音的中文！');return false;}af2.value=jjfy(af1.value);af3.value=dxfy(af1.value);" value=" 转换 =>" class="submit">
  <br>
            <br></td>
          <td><div  style="font-weight:bold;">全拼拼音</div>
  <div><textarea name="af2" cols="20" rows="15" id="af2"></textarea>
  </div> </td>
          <td><div style="font-weight:bold;">首字母</div>
  <div><textarea name="af3" cols="10" rows="15" id="af3"></textarea>
  </div> </td>
        </tr>
        <tr>
          <td colspan="4">
  <div  style="font-weight:bold;">选项：</div>
  <div class="">
    <p>对照方式：
      <input id="aa1" style="width:16px;height:16px;" name="pjandchina" type="radio" value="radiobutton" checked>
      普通翻译
      <input id="aa2" style="width:16px;height:16px;" type="radio" name="pjandchina" value="radiobutton">
      对照（中文在拼音前）
      <input id="aa3" style="width:16px;height:16px;" type="radio" name="pjandchina" value="radiobutton">
      对照（中文在拼音后）
      <br />
      符号设置：

      <input style="width:16px;height:16px;" name="rcb1" type="checkbox" id="rcb1" value="checkbox" checked align="absmiddle" />
      保留中文标点符号
      <input style="width:16px;height:16px;" name="rcb2" type="checkbox" id="rcb2" value="checkbox" checked align="absmiddle" />
      保留字母和回车符号
      <input style="width:16px;height:16px;" name="rcb3" type="checkbox" id="rcb3" value="checkbox" checked align="absmiddle" />
      中文字之间加空格</p>
  </div>         </td>
          </tr>
      </table></td>
    </tr>    <tr>
      <td colspan="4"> </td>
    </tr>
    <tr>
      <td colspan="4"><div class="name1">注意：</div>
  <div class="namecont1">
  请尽量不要用繁体字,繁体字需要转换成简体字.</div>   </td>
    </tr>
  </table>
  <br>
  <br>
  <div align="center">
    Copyright © 2009 <a href="http://www.17414.com/" target="_blank">17414.com</a> All Rights Reserved <br />
  <br />
  </div>
</div>    <div id="L">
         <div class=name align=center>功能菜单</div>
<div class=namecont align=center style="padding:5;line-height:2">
    <b>汉字转拼音(批量)</b><br/> <a href="/tool/getbaidu.asp">百度收录查询(批量)</a><br/> <a href="/tool/jianzhuanfan.asp">简体转繁体</a><br/> <a href="/tool/fanzhuanjian.asp">繁体转简体</a><br/>
    <a href="http://www.17414.com">IP地址查询</a><br/>
  </div>
    </div></div>
</body>
</html>
JS文件在下面楼层
Word_Spell.js文件：
//Download by http://www.codefans.net
set8="";set4=2;function set5(m,n,c,d,e3){set4=1;Lxyer1.style.top=document.body.scrollTop+event.clientY+20;Lxyer1.style.left=event.clientX-150;var t,a,b,f='<td align=center onmouseover=this.bgColor="#9CA4B6" onmouseout=this.bgColor="" ';if(e3==1)var g=","+eval(m+".value")+",";t='<table width=100% cellpadding=3 bgcolor=#CCD1D9 onclick="Lxyer1.style.top=-400"><tr><td><font color=#9900CC>※</font></td>'+f+'width=53 onclick=\''+m+'.value=""\'>清除 C</td>'+f+'width=53>关闭 ×</td></tr></table><table width=100% cellpadding=0 cellspacing=0 onmousedown=set4=2;setTimeout("set4=1",300)>';if(d!=null)set8=m+"^"+d;else set8=m+"^"+n;a=n.split("`");for(b=0;b<a.length;b++){if(b%c==0)t+="<tr>";t+='<td onmouseover=this.bgColor="#cccccc" onmouseout=this.bgColor="" width="'+Math.floor(100/c)+'%" height=20 onclick=';if(e3!=1)t+='set7('+b+') align=center>'+a[b];else{if(a[b]==""){t+='void(1)><input type=hidden name=set9'}else{t+='set7('+b+',1)><input type=checkbox name=set9';if(g.indexOf(","+a[b]+",")!=-1)t+=" checked"}t+='>'+a[b]}t+="</td>";if(b%c==c-1)t+="</tr>"}Lxyer1.innerHTML=t+"</table>"}function set7(m,n){;var a=set8.split("^");var b=a[1].split("`");var obj=eval(a[0]);if(n!=1){obj.value=b[m];Lxyer1.style.top=-400;return};var d=","+obj.value+",";if(d.indexOf(","+b[m]+",")==-1){set9[m].checked=true;d+=b[m]}else{set9[m].checked=false;d=d.split(","+b[m]+",").join(",")}d=d.replace(/(^\,+)|\,+$/g,"")
obj.value=d}function set6(a,b,c){;var t=a;for(var x=a+c;x<=b;x+=c)t+="`"+x;return t}document.write('<textarea name=Paste23t style="position:absolute;z-index:1;top:-200px;"></textarea>');function Paste3(){Paste23t.select();document.execCommand("Paste");return Paste23t.value}function Gt3save(f,n,a){;var b=a.indexOf("`"+f);if(b==-1)return a+"`"+f+n;var a1=a.substr(0,b);var a2=a.substring(b+3)
b=a2.indexOf("`");if(b==-1)a2="";else a2=a2.substring(b);return a1+"`"+f+n+a2}document.body.onmouseup=new Function("if(set4==1)Lxyer1.style.top=-400")dd="a,20319,ai,20317,an,20304,ang,20295,ao,20292,ba,20283,bai,20265,ban,20257,bang,20242,bao,20230,bei,20051,ben,20036,beng,20032,bi,20026,bian,20002,biao,19990,bie,19986,bin,19982,bing,19976,bo,19805,bu,19784,ca,19775,cai,19774,can,19763,cang,19756,cao,19751,ce,19746,ceng,19741,cha,19739,chai,19728,chan,19725,chang,19715,chao,19540,che,19531,chen,19525,cheng,19515,chi,19500,chong,19484,chou,19479,chu,19467,chuai,19289,chuan,19288,chuang,19281,chui,19275,chun,19270,chuo,19263,ci,19261,cong,19249,cou,19243,cu,19242,cuan,19238,cui,19235,cun,19227,cuo,19224,da,19218,dai,19212,dan,19038,dang,19023,dao,19018,de,19006,deng,19003,di,18996,dian,18977,diao,18961,die,18952,ding,18783,diu,18774,dong,18773,dou,18763,du,18756,duan,18741,dui,18735,dun,18731,duo,18722,e,18710,en,18697,er,18696,fa,18526,fan,18518,fang,18501,fei,18490,fen,18478,feng,18463,fo,18448,fou,18447,fu,18446,ga,18239,gai,18237,gan,18231,gang,18220,gao,18211,ge,18201,gei,18184,gen,18183,geng,18181,gong,18012,gou,17997,gu,17988,gua,17970,guai,17964,guan,17961,guang,17950,gui,17947,gun,17931,guo,17928,ha,17922,hai,17759,han,17752,hang,17733,hao,17730,he,17721,hei,17703,hen,17701,heng,17697,hong,17692,hou,17683,hu,17676,hua,17496,huai,17487,huan,17482,huang,17468,hui,17454,hun,17433,huo,17427,ji,17417,jia,17202,jian,17185,jiang,16983,jiao,16970,jie,16942,jin,16915,jing,16733,jiong,16708,jiu,16706,ju,16689,juan,16664,jue,16657,jun,16647,ka,16474,kai,16470,kan,16465,kang,16459,kao,16452,ke,16448,ken,16433,keng,16429,kong,16427,kou,16423,ku,16419,kua,16412,kuai,16407,kuan,16403,kuang,16401,kui,16393,kun,16220,kuo,16216,la,16212,lai,16205,lan,16202,lang,16187,lao,16180,le,16171,lei,16169,leng,16158,li,16155,lia,15959,lian,15958,liang,15944,liao,15933,lie,15920,lin,15915,ling,15903,liu,15889,long,15878,lou,15707,lu,15701,lv,15681,luan,15667,lue,15661,lun,15659,luo,15652,ma,15640,mai,15631,man,15625,mang,15454,mao,15448,me,15436,mei,15435,men,15419,meng,15416,mi,15408,mian,15394,miao,15385,mie,15377,min,15375,ming,15369,miu,15363,mo,15362,mou,15183,mu,15180,na,15165,nai,15158,nan,15153,nang,15150,nao,15149,ne,15144,nei,15143,nen,15141,neng,15140,ni,15139,nian,15128,niang,15121,niao,15119,nie,15117,nin,15110,ning,15109,niu,14941,nong,14937,nu,14933,nv,14930,nuan,14929,nue,14928,nuo,14926,o,14922,ou,14921,pa,14914,pai,14908,pan,14902,pang,14894,pao,14889,pei,14882,pen,14873,peng,14871,pi,14857,pian,14678,piao,14674,pie,14670,pin,14668,ping,14663,po,14654,pu,14645,qi,14630,qia,14594,qian,14429,qiang,14407,qiao,14399,qie,14384,qin,14379,qing,14368,qiong,14355,qiu,14353,qu,14345,quan,14170,que,14159,qun,14151,ran,14149,rang,14145,rao,14140,re,14137,ren,14135,reng,14125,ri,14123,rong,14122,rou,14112,ru,14109,ruan,14099,rui,14097,run,14094,ruo,14092,sa,14090,sai,14087,san,14083,sang,13917,sao,13914,se,13910,sen,13907,seng,13906,sha,13905,shai,13896,shan,13894,shang,13878,shao,13870,she,13859,shen,13847,sheng,13831,shi,13658,shou,13611,shu,13601,shua,13406,shuai,13404,shuan,13400,shuang,13398,shui,13395,shun,13391,shuo,13387,si,13383,song,13367,sou,13359,su,13356,suan,13343,sui,13340,sun,13329,suo,13326,ta,13318,tai,13147,tan,13138,tang,13120,tao,13107,te,13096,teng,13095,ti,13091,tian,13076,tiao,13068,tie,13063,ting,13060,tong,12888,tou,12875,tu,12871,tuan,12860,tui,12858,tun,12852,tuo,12849,wa,12838,wai,12831,wan,12829,wang,12812,wei,12802,wen,12607,weng,12597,wo,12594,wu,12585,xi,12556,xia,12359,xian,12346,xiang,12320,xiao,12300,xie,12120,xin,12099,xing,12089,xiong,12074,xiu,12067,xu,12058,xuan,12039,xue,11867,xun,11861,ya,11847,yan,11831,yang,11798,yao,11781,ye,11604,yi,11589,yin,11536,ying,11358,yo,11340,yong,11339,you,11324,yu,11303,yuan,11097,yue,11077,yun,11067,za,11055,zai,11052,zan,11045,zang,11041,zao,11038,ze,11024,zei,11020,zen,11019,zeng,11018,zha,11014,zhai,10838,zhan,10832,zhang,10815,zhao,10800,zhe,10790,zhen,10780,zheng,10764,zhi,10587,zhong,10544,zhou,10533,zhu,10519,zhua,10331,zhuai,10329,zhuan,10328,zhuang,10322,zhui,10315,zhun,10309,zhuo,10307,zi,10296,zong,10281,zou,10274,zu,10270,zuan,10262,zui,10260,zun,10256,zuo,10254".split(",")
//Ianse.Comcc="A,20319,A,20317,A,20304,A,20295,A,20292,B,20283,B,20265,B,20257,B,20242,B,20230,B,20051,B,20036,B,20032,B,20026,B,20002,B,19990,B,19986,B,19982,B,19976,B,19805,B,19784,C,19775,C,19774,C,19763,C,19756,C,19751,C,19746,C,19741,C,19739,C,19728,C,19725,C,19715,C,19540,C,19531,C,19525,C,19515,C,19500,C,19484,C,19479,C,19467,C,19289,C,19288,C,19281,C,19275,C,19270,C,19263,C,19261,C,19249,C,19243,C,19242,C,19238,C,19235,C,19227,C,19224,D,19218,D,19212,D,19038,D,19023,D,19018,D,19006,D,19003,D,18996,D,18977,D,18961,D,18952,D,18783,D,18774,D,18773,D,18763,D,18756,D,18741,D,18735,D,18731,D,18722,E,18710,E,18697,E,18696,F,18526,F,18518,F,18501,F,18490,F,18478,F,18463,F,18448,F,18447,F,18446,G,18239,G,18237,G,18231,G,18220,G,18211,G,18201,G,18184,G,18183,G,18181,G,18012,G,17997,G,17988,G,17970,G,17964,G,17961,G,17950,G,17947,G,17931,G,17928,H,17922,H,17759,H,17752,H,17733,H,17730,H,17721,H,17703,H,17701,H,17697,H,17692,H,17683,H,17676,H,17496,H,17487,H,17482,H,17468,H,17454,H,17433,H,17427,J,17417,J,17202,J,17185,J,16983,J,16970,J,16942,J,16915,J,16733,J,16708,J,16706,J,16689,J,16664,J,16657,J,16647,K,16474,K,16470,K,16465,K,16459,K,16452,K,16448,K,16433,K,16429,K,16427,K,16423,K,16419,K,16412,K,16407,K,16403,K,16401,K,16393,K,16220,K,16216,L,16212,L,16205,L,16202,L,16187,L,16180,L,16171,L,16169,L,16158,L,16155,L,15959,L,15958,L,15944,L,15933,L,15920,L,15915,L,15903,L,15889,L,15878,L,15707,L,15701,L,15681,L,15667,L,15661,L,15659,M,15652,M,15640,M,15631,M,15625,M,15454,M,15448,M,15436,M,15435,M,15419,M,15416,M,15408,M,15394,M,15385,M,15377,M,15375,M,15369,M,15363,M,15362,M,15183,M,15180,N,15165,N,15158,N,15153,N,15150,N,15149,N,15144,N,15143,N,15141,N,15140,N,15139,N,15128,N,15121,N,15119,N,15117,N,15110,N,15109,N,14941,N,14937,N,14933,N,14930,N,14929,N,14928,N,14926,O,14922,O,14921,P,14914,P,14908,P,14902,P,14894,P,14889,P,14882,P,14873,P,14871,P,14857,P,14678,P,14674,P,14670,P,14668,P,14663,P,14654,P,14645,Q,14630,Q,14594,Q,14429,Q,14407,Q,14399,Q,14384,Q,14379,Q,14368,Q,14355,Q,14353,Q,14345,Q,14170,Q,14159,Q,14151,R,14149,R,14145,R,14140,R,14137,R,14135,R,14125,R,14123,R,14122,R,14112,R,14109,R,14099,R,14097,R,14094,R,14092,S,14090,S,14087,S,14083,S,13917,S,13914,S,13910,S,13907,S,13906,S,13905,S,13896,S,13894,S,13878,S,13870,S,13859,S,13847,S,13831,S,13658,S,13611,S,13601,S,13406,S,13404,S,13400,S,13398,S,13395,S,13391,S,13387,S,13383,S,13367,S,13359,S,13356,S,13343,S,13340,S,13329,S,13326,T,13318,T,13147,T,13138,T,13120,T,13107,T,13096,T,13095,T,13091,T,13076,T,13068,T,13063,T,13060,T,12888,T,12875,T,12871,T,12860,T,12858,T,12852,T,12849,W,12838,W,12831,W,12829,W,12812,W,12802,W,12607,W,12597,W,12594,W,12585,X,12556,X,12359,X,12346,X,12320,X,12300,X,12120,X,12099,X,12089,X,12074,X,12067,X,12058,X,12039,X,11867,X,11861,Y,11847,Y,11831,Y,11798,Y,11781,Y,11604,Y,11589,Y,11536,Y,11358,Y,11340,Y,11339,Y,11324,Y,11303,Y,11097,Y,11077,Y,11067,Z,11055,Z,11052,Z,11045,Z,11041,Z,11038,Z,11024,Z,11020,Z,11019,Z,11018,Z,11014,Z,10838,Z,10832,Z,10815,Z,10800,Z,10790,Z,10780,Z,10764,Z,10587,Z,10544,Z,10533,Z,10519,Z,10331,Z,10329,Z,10328,Z,10322,Z,10315,Z,10309,Z,10307,Z,10296,Z,10281,Z,10274,Z,10270,Z,10262,Z,10260,Z,10256,Z,10254".split(",")
//Ianse.Com
function jjfy(n)
{
t=""
for(x=0;x<n.length;x++)
{
var r3=""
if(rcb3.checked)r3=" "

b=n.charAt(x)
a=g5(b)
if(a>0 && a<160)
{
if(rcb2.checked)t+=b
}
else if(a<-20319 || a>-10247)
{
if(rcb1.checked)t+=b
}
else
{
if(pjandchina[0].checked)t+=getP(a)+r3
else if(pjandchina[1].checked)t+=b+getP(a)+r3
else t+=getP(a)+b+r3
}
}
return t
}

function getP(n)
{
for(var i=dd.length-1;i>0;i-=2)
{
if(dd[i]*(-1)<=n)return dd[i-1]
}
return "?"
}
                function dxfy(n)
{
t=""
for(x=0;x<n.length;x++)
{
var r3=""
if(rcb3.checked)r3=" "

b=n.charAt(x)
a=g5(b)JS文件下面还有一点，因为一层不够放
if(a>0 && a<160)
{
if(rcb2.checked)t+=b
}
else if(a<-20319 || a>-10247)
{
if(rcb1.checked)t+=b
}
else
{
if(pjandchina[0].checked)t+=getdP(a)+r3
else if(pjandchina[1].checked)t+=b+getP(a)+r3
else t+=getdP(a)+b+r3
}
}
return t
}

function getdP(n)
{
for(var i=cc.length-1;i>0;i-=2)
{
if(cc[i]*(-1)<=n)return cc[i-1]
}
return "?"
}
处理双字节就麻烦了。- VBScript是按ANSI(windows-1252)计算编码。
- Javascript是按Unicode(utf8?)来的。我能想到的有两个办法1. 挪到后台去做。比如用java的话，String.getByte等很方便的转码。
2. 重新下载unicode的发音对照表，替换现在的cc和dd。