一个汉字转成拼音的代码

　　1.添加索引
2.遍历词典

　　<%
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
d.add geng,-18181
d.add gong,-18012
d.add gou,-17997
d.add gu,-17988
d.add gua,-17970
d.add guai,-17964
d.add guan,-17961
d.add guang,-17950
d.add gui,-17947
d.add gun,-17931
d.add guo,-17928
d.add ha,-17922
d.add hai,-17759
d.add han,-17752
d.add hang,-17733
d.add hao,-17730
d.add he,-17721
d.add hei,-17703
d.add hen,-17701
d.add heng,-17697
d.add hong,-17692
d.add hou,-17683
d.add hu,-17676
d.add hua,-17496
d.add huai,-17487
d.add huan,-17482
d.add huang,-17468
d.add hui,-17454
d.add hun,-17433
d.add huo,-17427
d.add ji,-17417
d.add jia,-17202
d.add jian,-17185
d.add jiang,-16983
d.add jiao,-16970
d.add jie,-16942
d.add jin,-16915
d.add jing,-16733
d.add jiong,-16708
d.add jiu,-16706
d.add ju,-16689
d.add juan,-16664
d.add jue,-16657
d.add jun,-16647
d.add ka,-16474
d.add kai,-16470
d.add kan,-16465
d.add kang,-16459
d.add kao,-16452
d.add ke,-16448
d.add ken,-16433
d.add keng,-16429
d.add kong,-16427
d.add kou,-16423
d.add ku,-16419
d.add kua,-16412
d.add kuai,-16407
d.add kuan,-16403
d.add kuang,-16401
d.add kui,-16393
d.add kun,-16220
d.add kuo,-16216
d.add la,-16212
d.add lai,-16205
d.add lan,-16202
d.add lang,-16187
d.add lao,-16180

　　转自：动态网制作指南
d.add le,-16171