请高手帮帮忙，写一下给我看一下，使用JavaScript也能够接受。
------解决方案--------------------
<%
Set d = CreateObject( "Scripting.Dictionary ")
d.add "a ",-20319
d.add "ai ",-20317
d.add "an ",-20304
d.add "ang ",-20295
d.add "ao ",-20292
d.add "ba ",-20283
d.add "bai ",-20265
d.add "ban ",-20257
d.add "bang ",-20242
d.add "bao ",-20230
d.add "bei ",-20051
d.add "ben ",-20036
d.add "beng ",-20032
d.add "bi ",-20026
d.add "bian ",-20002
d.add "biao ",-19990
d.add "bie ",-19986
d.add "bin ",-19982
d.add "bing ",-19976
d.add "bo ",-19805
d.add "bu ",-19784
d.add "ca ",-19775
d.add "cai ",-19774
d.add "can ",-19763
d.add "cang ",-19756
d.add "cao ",-19751
d.add "ce ",-19746
d.add "ceng ",-19741
d.add "cha ",-19739
d.add "chai ",-19728
d.add "chan ",-19725
d.add "chang ",-19715
d.add "chao ",-19540
d.add "che ",-19531
d.add "chen ",-19525
d.add "cheng ",-19515
d.add "chi ",-19500
d.add "chong ",-19484
d.add "chou ",-19479
d.add "chu ",-19467
d.add "chuai ",-19289
d.add "chuan ",-19288
d.add "chuang ",-19281
d.add "chui ",-19275
d.add "chun ",-19270
d.add "chuo ",-19263
d.add "ci ",-19261
d.add "cong ",-19249
d.add "cou ",-19243
d.add "cu ",-19242
d.add "cuan ",-19238
d.add "cui ",-19235
d.add "cun ",-19227
d.add "cuo ",-19224
d.add "da ",-19218
d.add "dai ",-19212
d.add "dan ",-19038
d.add "dang ",-19023
d.add "dao ",-19018
d.add "de ",-19006
d.add "deng ",-19003
d.add "di ",-18996
d.add "dian ",-18977
d.add "diao ",-18961
d.add "die ",-18952
d.add "ding ",-18783
d.add "diu ",-18774
d.add "dong ",-18773
d.add "dou ",-18763
d.add "du ",-18756
d.add "duan ",-18741
d.add "dui ",-18735
d.add "dun ",-18731
d.add "duo ",-18722
d.add "e ",-18710
d.add "en ",-18697
d.add "er ",-18696
d.add "fa ",-18526
d.add "fan ",-18518
d.add "fang ",-18501
d.add "fei ",-18490
d.add "fen ",-18478
d.add "feng ",-18463
d.add "fo ",-18448
d.add "fou ",-18447
d.add "fu ",-18446
d.add "ga ",-18239
d.add "gai ",-18237
d.add "gan ",-18231
d.add "gang ",-18220
d.add "gao ",-18211
d.add "ge ",-18201
d.add "gei ",-18184
d.add "gen ",-18183