汉字转换拼音-ASP版(可制作插件)

经常看到一些CMS中添加栏目后自动显示对应的拼音字母,功能不错!下面是ASP版的汉字转拼音代码,自己看看!!

vb 代码
 
  1. <%
  2. Set d = CreateObject("Scripting.Dictionary")
  3. d.add "a",-20319
  4. d.add "ai",-20317
  5. d.add "an",-20304
  6. d.add "ang",-20295
  7. d.add "ao",-20292
  8. d.add "ba",-20283
  9. d.add "bai",-20265
  10. d.add "ban",-20257
  11. d.add "bang",-20242
  12. d.add "bao",-20230
  13. d.add "bei",-20051
  14. d.add "ben",-20036
  15. d.add "beng",-20032
  16. d.add "bi",-20026
  17. d.add "bian",-20002
  18. d.add "biao",-19990
  19. d.add "bie",-19986
  20. d.add "bin",-19982
  21. d.add "bing",-19976
  22. d.add "bo",-19805
  23. d.add "bu",-19784
  24. d.add "ca",-19775
  25. d.add "cai",-19774
  26. d.add "can",-19763
  27. d.add "cang",-19756
  28. d.add "cao",-19751
  29. d.add "ce",-19746
  30. d.add "ceng",-19741
  31. d.add "cha",-19739
  32. d.add "chai",-19728
  33. d.add "chan",-19725
  34. d.add "chang",-19715
  35. d.add "chao",-19540
  36. d.add "che",-19531
  37. d.add "chen",-19525
  38. d.add "cheng",-19515
  39. d.add "chi",-19500
  40. d.add "chong",-19484
  41. d.add "chou",-19479
  42. d.add "chu",-19467
  43. d.add "chuai",-19289
  44. d.add "chuan",-19288
  45. d.add "chuang",-19281
  46. d.add "chui",-19275
  47. d.add "chun",-19270
  48. d.add "chuo",-19263
  49. d.add "ci",-19261
  50. d.add "cong",-19249
  51. d.add "cou",-19243
  52. d.add "cu",-19242
  53. d.add "cuan",-19238
  54. d.add "cui",-19235
  55. d.add "cun",-19227
  56. d.add "cuo",-19224
  57. d.add "da",-19218
  58. d.add "dai",-19212
  59. d.add "dan",-19038
  60. d.add "dang",-19023
  61. d.add "dao",-19018
  62. d.add "de",-19006
  63. d.add "deng",-19003
  64. d.add "di",-18996
  65. d.add "dian",-18977
  66. d.add "diao",-18961
  67. d.add "die",-18952
  68. d.add "ding",-18783
  69. d.add "diu",-18774
  70. d.add "dong",-18773
  71. d.add "dou",-18763
  72. d.add "du",-18756
  73. d.add "duan",-18741
  74. d.add &qu
    ot;dui"
    ,-18735
  75. d.add "dun",-18731
  76. d.add "duo",-18722
  77. d.add "e",-18710
  78. d.add "en",-18697
  79. d.add "er",-18696
  80. d.add "fa",-18526
  81. d.add "fan",-18518
  82. d.add "fang",-18501
  83. d.add "fei",-18490
  84. d.add "fen",-18478
  85. d.add "feng",-18463
  86. d.add "fo",-18448
  87. d.add "fou",-18447
  88. d.add "fu",-18446
  89. d.add "ga",-18239
  90. d.add "gai",-18237
  91. d.add "gan",-18231
  92. d.add "gang",-18220
  93. d.add "gao",-18211
  94. d.add "ge",-18201
  95. d.add "gei",-18184
  96. d.add "gen",-18183
  97. d.add "geng",-18181
  98. d.add "gong",-18012
  99. d.add "gou",-17997
  100. d.add "gu",-17988
  101. d.add "gua",-17970
  102. d.add "guai",-17964
  103. d.add "guan",-17961
  104. d.add "guang",-17950
  105. d.add "gui",-17947
  106. d.add "gun",-17931
  107. d.add "guo",-17928
  108. d.add "ha",-17922
  109. d.add "hai",-17759
  110. d.add "han",-17752
  111. d.add "hang",-17733
  112. d.add "hao",-17730
  113. d.add "he",-17721
  114. d.add "hei",-17703
  115. d.add "hen",-17701
  116. d.add "heng",-17697
  117. d.add "hong",-17692
  118. d.add "hou",-17683
  119. d.add "hu",-17676
  120. d.add "hua",-17496
  121. d.add "huai",-17487
  122. d.add "huan",-17482
  123. d.add "huang",-17468
  124. d.add "hui",-17454
  125. d.add "hun",-17433
  126. d.add "huo",-17427
  127. d.add "ji",-17417
  128. d.add "jia",-17202
  129. d.add "jian",-17185
  130. d.add "jiang",-16983
  131. d.add "jiao",-16970
  132. d.add "jie",-16942
  133. d.add "jin",-16915
  134. d.add "jing",-16733
  135. d.add "jiong",-16708
  136. d.add "jiu",-16706
  137. d.add "ju",-16689
  138. d.add "juan",-16664
  139. d.add "jue",-16657
  140. d.add "jun",-16647
  141. d.add "ka",-16474
  142. d.add "kai",-16470
  143. d.add "kan",-16465
  144. d.add "kang",-16459
  145. d.add "kao",-16452
  146. d.add "ke",-16448
  147. d.add "ken",-16433
  148. d.add "keng",-16429
  149. d.add "kong",-16427
  150. d.add "kou",-16423
  151. d.add "ku",-16419
  152. d.add "kua",-16412
  153. d.add "kuai",-16407
  154. d.add "kuan",-16403
  155. d.add "kuang",-16401
  156. d.add "kui",-16393
  157. d.add "kun",-16220
  158. d.add "kuo",-16216
  159. d.add "la",-16212
  160. d.add "lai",-16205
  161. d.add "lan",-16202
  162. d.add "lang",-16187
  163. d.add "lao",-16180
  164. d.add "le",-16171
  165. d.add "lei",-16169
  166. d.add "leng",-16158
  167. d.add "li",-16155
  168. d.add "lia",-15959
  169. d.add "lian",-15958
  170. d.add "liang",-15944
  171. d.add "liao",-15933
  172. d.add "lie",-15920
  173. d.add "lin",-15915
  174. d.add "ling",-15903
  175. d.add "liu",-15889
  176. d.add "long",-15878
  177. d.add "lou",-15707
  178. d.add "lu",-15701
  179. d.add "lv",-15681
  180. d.add "luan",-15667
  181. d.add "lue",-15661
  182. d.add "lun",-15659
  183. d.add "luo",-15652
  184. d.add "ma",-15640
  185. d.add "mai",-15631
  186. d.add "man",-15625
  187. d.add "mang",-15454
  188. d.add "mao",-15448
  189. d.add "me",-15436
  190. d.add "mei",-15435
  191. d.add "men",-15419
  192. d.add "meng",-15416
  193. d.add "mi",-15408
  194. d.add "mian",-15394
  195. d.add "miao",-15385
  196. d.add "mie",-15377
  197. d.add "min",-15375
  198. d.add "ming",-15369
  199. d.add "miu",-15363
  200. d.add "mo",-15362
  201. d.add "mou",-15183
  202. d.add "mu",-15180
  203. d.add "na",-15165
  204. d.add "nai",-15158
  205. d.add "nan",-15153
  206. d.add "nang",-15150
  207. d.add "nao",-15149
  208. d.add "ne",-15144
  209. d.add "nei",-15143
  210. d.add "nen",-15141
  211. d.add "neng",-15140
  212. d.add "ni",-15139
  213. d.add "nian",-15128
  214. d.add "niang",-15121
  215. d.add "niao",-15119
  216. d.add "nie",-15117
  217. d.add "nin",-15110
  218. d.add "ning",-15109
  219. d.add "niu",-14941
  220. d.add "nong",-14937
  221. d.add "nu",-14933
  222. d.add "nv",-14930
  223. d.add "nuan",-14929
  224. d.add "nue",-14928
  225. d.add "nuo",-14926
  226. d.add "o",-14922
  227. d.add "ou",-14921
  228. d.add "pa",-14914
  229. d.add "pai",-14908
  230. d.add "pan",-14902
  231. d.add "pang",-14894
  232. d.add "pao",-14889
  233. d.add "pei",-14882
  234. d.add "pen",-14873
  235. d.add "peng",-14871
  236. d.add "pi",-14857
  237. d.add "pian",-14678
  238. d.add "piao",-14674
  239. d.add "pie",-14670
  240. d.add "pin",-14668
  241. d.add "ping",-14663
  242. d.add "po",-14654
  243. d.add "pu",-14645
  244. d.add "qi",-14630
  245. d.add "qia",-14594
  246. d.add "qian",-14429
  247. d.add "qiang",-14407
  248. d.add "qiao",-14399
  249. d.add "qie",-14384
  250. d.add "qin",-14379
  251. d.add "qing",-14368
  252. d.add "qiong",-14355
  253. d.add "qiu",-14353
  254. d.add "qu",-14345
  255. d.add "quan",-14170
  256. d.add "que",-14159
  257. d.add "qun",-14151
  258. d.add "ran",-14149
  259. d.add "rang",-14145
  260. d.add "rao",-14140
  261. d.add "re",-14137
  262. d.add "ren",-14135
  263. d.add "reng",-14125
  264. d.add "ri",-14123
  265. d.add "rong",-14122
  266. d.add "rou",-14112
  267. d.add "ru",-14109
  268. d.add "ruan",-14099
  269. d.add "rui",-14097
  270. d.add "run",-14094
  271. d.add "ruo",-14092
  272. d.add "sa",-14090
  273. d.add "sai",-14087
  274. d.add "san",-14083
  275. d.add "sang",-13917
  276. d.add "sao",-13914
  277. d.add "se",-13910
  278. d.add "sen",-13907
  279. d.add "seng",-13906
  280. d.add "sha",-13905
  281. d.add "shai",-13896
  282. d.add "shan",-13894
  283. d.add "shang",-13878
  284. d.add "shao",-13870
  285. d.add "she",-13859
  286. d.add "shen",-13847
  287. d.add "sheng",-13831
  288. d.add "shi",-13658
  289. d.add "shou",-13611
  290. d.add "shu",-13601
  291. d.add "shua",-13406
  292. d.add "shuai",-13404
  293. d.add "shuan",-13400
  294. d.add "shuang",-13398
  295. d.add "shui",-13395
  296. d.add "shun",-13391
  297. d.add "shuo",-13387
  298. d.add "si",-13383
  299. d.add "song",-13367
  300. d.add "sou",-13359
  301. d.add "su",-13356
  302. d.add "suan",-13343
  303. d.add "sui",-13340
  304. d.add "sun",-13329
  305. d.add "suo",-13326
  306. d.add "ta",-13318
  307. d.add "tai",-13147
  308. d.add "tan",-13138
  309. d.add "tang",-13120
  310. d.add "tao",-13107
  311. d.add "te",-13096
  312. d.add "teng",-13095
  313. d.add "ti",-13091
  314. d.add "tian",-13076
  315. d.add "tiao",-13068
  316. d.add "tie",-13063
  317. d.add "ting",-13060
  318. d.add "tong",-12888
  319. d.add "tou",-12875
  320. d.add "tu",-12871
  321. d.add "tuan",-12860
  322. d.add "tui",-12858
  323. d.add "tun",-12852
  324. d.add "tuo",-12849
  325. d.add "wa",-12838
  326. d.add "wai",-12831
  327. d.add "wan",-12829
  328. d.add "wang",-12812
  329. d.add "wei",-12802
  330. d.add "wen",-12607
  331. d.add "weng",-12597
  332. d.add "wo",-12594
  333. d.add "wu",-12585
  334. d.add "xi",-12556
  335. d.add "xia",-12359
  336. d.add "xian",-12346
  337. d.add "xiang",-12320
  338. d.add "xiao",-12300
  339. d.add "xie",-12120
  340. d.add "xin",-12099
  341. d.add "xing",-12089
  342. d.add "xiong",-12074
  343. d.add "xiu",-12067
  344. d.add "xu",-12058
  345. d.add "xuan",-12039
  346. d.add "xue",-11867
  347. d.add "xun",-11861
  348. d.add "ya",-11847
  349. d.add "yan",-11831
  350. d.add "yang",-11798
  351. d.add "yao",-11781
  352. d.add "ye",-11604
  353. d.add "yi",-11589
  354. d.add "yin",-11536
  355. d.add "ying",-11358
  356. d.add "yo",-11340
  357. d.add "yong",-11339
  358. d.add "you",-11324
  359. d.add "yu",-11303
  360. d.add "yuan",-11097
  361. d.add "yue",-11077
  362. d.add "yun",-11067
  363. d.add "za",-11055
  364. d.add "zai",-11052
  365. d.add "zan",-11045
  366. d.add "zang",-11041
  367. d.add "zao",-11038
  368. d.add "ze",-11024
  369. d.add "zei",-11020
  370. d.add "zen",-11019
  371. d.add "zeng",-11018
  372. d.add "zha",-11014
  373. d.add "zhai",-10838
  374. d.add "zhan",-10832
  375. d.add "zhang",-10815
  376. d.add "zhao",-10800
  377. d.add "zhe",-10790
  378. d.add "zhen",-10780
  379. d.add "zheng",-10764
  380. d.a

    dd "zhi",-10587

  381. d.add "zhong",-10544
  382. d.add "zhou",-10533
  383. d.add "zhu",-10519
  384. d.add "zhua",-10331
  385. d.add "zhuai",-10329
  386. d.add "zhuan",-10328
  387. d.add "zhuang",-10322
  388. d.add "zhui",-10315
  389. d.add "zhun",-10309
  390. d.add "zhuo",-10307
  391. d.add "zi",-10296
  392. d.add "zong",-10281
  393. d.add "zou",-10274
  394. d.add "zu",-10270
  395. d.add "zuan",-10262
  396. d.add "zui",-10260
  397. d.add "zun",-10256
  398. d.add "zuo",-10254
  399. function g(num)
  400. if num>0 and num<160 then
  401. g=chr(num)
  402. else 
  403. if num<-20319 or num>-10247 then
  404. g=""
  405. else
  406. a=d.Items
  407. b=d.keys
  408. for i=d.count-1 to 0 step -1
  409. if a(i)<=num then exit for
  410. next
  411. g=b(i)
  412. end if
  413. end if
  414. end function
  415. function c(str)
  416. c=""
  417. for i=1 to len(str)
  418. c=c&g(asc(mid(str,i,1)))
  419. next
  420. end function
  421. response.write c(request("hz"))
  422. %>
  423. <form method=post>
  424. 请在此处输入中文:<input name=hz> <input type=submit name=submit value="submit">
  425. </form>