zoukankan      html  css  js  c++  java
  • ASP汉字转拼音函数的方法

    <%

    'ASP汉字转拼音函数

    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

    d.add "lei",-16169

    d.add "leng",-16158

    d.add "li",-16155

    d.add "lia",-15959

    d.add "lian",-15958

    d.add "liang",-15944

    d.add "liao",-15933

    d.add "lie",-15920

    d.add "lin",-15915

    d.add "ling",-15903

    d.add "liu",-15889

    d.add "long",-15878

    d.add "lou",-15707

    d.add "lu",-15701

    d.add "lv",-15681

    d.add "luan",-15667

    d.add "lue",-15661

    d.add "lun",-15659

    d.add "luo",-15652

    d.add "ma",-15640

    d.add "mai",-15631

    d.add "man",-15625

    d.add "mang",-15454

    d.add "mao",-15448

    d.add "me",-15436

    d.add "mei",-15435

    d.add "men",-15419

    d.add "meng",-15416

    d.add "mi",-15408

    d.add "mian",-15394

    d.add "miao",-15385

    d.add "mie",-15377

    d.add "min",-15375

    d.add "ming",-15369

    d.add "miu",-15363

    d.add "mo",-15362

    d.add "mou",-15183

    d.add "mu",-15180

    d.add "na",-15165

    d.add "nai",-15158

    d.add "nan",-15153

    d.add "nang",-15150

    d.add "nao",-15149

    d.add "ne",-15144

    d.add "nei",-15143

    d.add "nen",-15141

    d.add "neng",-15140

    d.add "ni",-15139

    d.add "nian",-15128

    d.add "niang",-15121

    d.add "niao",-15119

    d.add "nie",-15117

    d.add "nin",-15110

    d.add "ning",-15109

    d.add "niu",-14941

    d.add "nong",-14937

    d.add "nu",-14933

    d.add "nv",-14930

    d.add "nuan",-14929

    d.add "nue",-14928

    d.add "nuo",-14926

    d.add "o",-14922

    d.add "ou",-14921

    d.add "pa",-14914

    d.add "pai",-14908

    d.add "pan",-14902

    d.add "pang",-14894

    d.add "pao",-14889

    d.add "pei",-14882

    d.add "pen",-14873

    d.add "peng",-14871

    d.add "pi",-14857

    d.add "pian",-14678

    d.add "piao",-14674

    d.add "pie",-14670

    d.add "pin",-14668

    d.add "ping",-14663

    d.add "po",-14654

    d.add "pu",-14645

    d.add "qi",-14630

    d.add "qia",-14594

    d.add "qian",-14429

    d.add "qiang",-14407

    d.add "qiao",-14399

    d.add "qie",-14384

    d.add "qin",-14379

    d.add "qing",-14368

    d.add "qiong",-14355

    d.add "qiu",-14353

    d.add "qu",-14345

    d.add "quan",-14170

    d.add "que",-14159

    d.add "qun",-14151

    d.add "ran",-14149

    d.add "rang",-14145

    d.add "rao",-14140

    d.add "re",-14137

    d.add "ren",-14135

    d.add "reng",-14125

    d.add "ri",-14123

    d.add "rong",-14122

    d.add "rou",-14112

    d.add "ru",-14109

    d.add "ruan",-14099

    d.add "rui",-14097

    d.add "run",-14094

    d.add "ruo",-14092

    d.add "sa",-14090

    d.add "sai",-14087

    d.add "san",-14083

    d.add "sang",-13917

    d.add "sao",-13914

    d.add "se",-13910

    d.add "sen",-13907

    d.add "seng",-13906

    d.add "sha",-13905

    d.add "shai",-13896

    d.add "shan",-13894

    d.add "shang",-13878

    d.add "shao",-13870

    d.add "she",-13859

    d.add "shen",-13847

    d.add "sheng",-13831

    d.add "shi",-13658

    d.add "shou",-13611

    d.add "shu",-13601

    d.add "shua",-13406

    d.add "shuai",-13404

    d.add "shuan",-13400

    d.add "shuang",-13398

    d.add "shui",-13395

    d.add "shun",-13391

    d.add "shuo",-13387

    d.add "si",-13383

    d.add "song",-13367

    d.add "sou",-13359

    d.add "su",-13356

    d.add "suan",-13343

    d.add "sui",-13340

    d.add "sun",-13329

    d.add "suo",-13326

    d.add "ta",-13318

    d.add "tai",-13147

    d.add "tan",-13138

    d.add "tang",-13120

    d.add "tao",-13107

    d.add "te",-13096

    d.add "teng",-13095

    d.add "ti",-13091

    d.add "tian",-13076

    d.add "tiao",-13068

    d.add "tie",-13063

    d.add "ting",-13060

    d.add "tong",-12888

    d.add "tou",-12875

    d.add "tu",-12871

    d.add "tuan",-12860

    d.add "tui",-12858

    d.add "tun",-12852

    d.add "tuo",-12849

    d.add "wa",-12838

    d.add "wai",-12831

    d.add "wan",-12829

    d.add "wang",-12812

    d.add "wei",-12802

    d.add "wen",-12607

    d.add "weng",-12597

    d.add "wo",-12594

    d.add "wu",-12585

    d.add "xi",-12556

    d.add "xia",-12359

    d.add "xian",-12346

    d.add "xiang",-12320

    d.add "xiao",-12300

    d.add "xie",-12120

    d.add "xin",-12099

    d.add "xing",-12089

    d.add "xiong",-12074

    d.add "xiu",-12067

    d.add "xu",-12058

    d.add "xuan",-12039

    d.add "xue",-11867

    d.add "xun",-11861

    d.add "ya",-11847

    d.add "yan",-11831

    d.add "yang",-11798

    d.add "yao",-11781

    d.add "ye",-11604

    d.add "yi",-11589

    d.add "yin",-11536

    d.add "ying",-11358

    d.add "yo",-11340

    d.add "yong",-11339

    d.add "you",-11324

    d.add "yu",-11303

    d.add "yuan",-11097

    d.add "yue",-11077

    d.add "yun",-11067

    d.add "za",-11055

    d.add "zai",-11052

    d.add "zan",-11045

    d.add "zang",-11041

    d.add "zao",-11038

    d.add "ze",-11024

    d.add "zei",-11020

    d.add "zen",-11019

    d.add "zeng",-11018

    d.add "zha",-11014

    d.add "zhai",-10838

    d.add "zhan",-10832

    d.add "zhang",-10815

    d.add "zhao",-10800

    d.add "zhe",-10790

    d.add "zhen",-10780

    d.add "zheng",-10764

    d.add "zhi",-10587

    d.add "zhong",-10544

    d.add "zhou",-10533

    d.add "zhu",-10519

    d.add "zhua",-10331

    d.add "zhuai",-10329

    d.add "zhuan",-10328

    d.add "zhuang",-10322

    d.add "zhui",-10315

    d.add "zhun",-10309

    d.add "zhuo",-10307

    d.add "zi",-10296

    d.add "zong",-10281

    d.add "zou",-10274

    d.add "zu",-10270

    d.add "zuan",-10262

    d.add "zui",-10260

    d.add "zun",-10256

    d.add "zuo",-10254

    function g(num)

    if num>0 and num<160 then

    g=chr(num)

    else

    if num<-20319 or num>-10247 then

    g=""

    else

    a=d.Items

    b=d.keys

    for i=d.count-1 to 0 step -1

    if a(i)<=num then exit for

    next

    g=b(i)

    end if

    end if

    end function

    function c(str)

    c=""

    for i=1 to len(str)

    c=c&g(asc(mid(str,i,1)))

    next

    end function

    response.write c(request("word"))

    %>

    <form method="post">

    请在此处输入中文:<input name="word" type="text">

    <input type="submit" name="submit" value="提交">

    </form>

  • 相关阅读:
    微服务下,使用ELK做日志收集及分析
    Spring boot下,集成任务调度中心(XXL-JOB)
    使用mysqldump 导出数据时的常用选项
    MySQL 批量insert 、单条insert
    分享一个 电子书下载网站 支持 ebook pdf azw3 epub mobi
    稀疏数组
    LaTeX 交叉引用系统简介
    服务器jupyter配置与ssh远程登录
    postgresql中终止正在执行的SQL语句
    Python 个人笔记(一)
  • 原文地址:https://www.cnblogs.com/bit5566/p/5674492.html
Copyright © 2011-2022 走看看