vbs获得汉字拼音及首字母.docVIP

vbs 获得汉字拼音及首字母 ======================获=得汉字拼音 Setd=Server.CreateObject(Scripting.Dictionary) d.Adda,-20319:d.Addai,-20317:d.Addan,-20304:d.Addang,-20295: d.Addao,-20292:d.Addba,-20283:d.Addbai,-20265:d.Addban,-2025 7:d.Addbang,-20242:d.Addbao,-20230:d.Addbei,-20051:d.Addben, -20036:d.Addbeng,-20032:d.Addbi,-20026:d.Addbian,-20002:d.Add biao,-19990:d.Addbie,-19986:d.Addbin,-19982:d.Addbing,-19976:d. Addbo,-19805:d.Addbu,-19784:d.Addca,-19775:d.Addcai,-19774:d .Addcan,-19763:d.Addcang,-19756:d.Addcao,-19751:d.Addce,-197 46:d.Addceng,-19741:d.Addcha,-19739:d.Addchai,-19728:d.Addcha n,-19725:d.Addc