Original code:
<
%
Set
di
=
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
"
chain
"
,
-
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
"
dend
"
,
-
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
"
HAN
"
,
-
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
"
SHAN
"
,
-
13878
D.add
"
Shao
"
,
-
13870
D.add
"
SHE
"
,
-
3859
D.add
"
SHEN
"
,
-
13847
D.add
"
Sheng
"
,
-
13831
D.add
"
shi
"
,
-
13658
D.add
"
shou
"
,
-
3611
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
"
tun
"
,
-
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
"
WAN
"
,
-
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
"
"
,
-
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
oral
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)
"
Hz
"
)))
>
<
Form Method
=
POST
>
Please enter Chinese here:
<
INPUT NAME
=
Hz
>
FORM
>
Improve code, support the first letters uppercase and Email name abbreviation mode
<
DOCTYPE HTML
Public
"
- // W3C // DTD HTML 4.01 Transitional // EN
"
"
http://www.w3.org/tr/html4/loose.dtd
"
>
<
HTML
>
<
HEAD
>
<
Meta http
-
Equiv
=
"
Content-Type
"
Content
=
"
TEXT / HTML; Charset = GB2312
"
>
<
Script src
=
"
http://www.google-analytics.com/urchin.js
"
Type
=
"
Text / JavaScript
"
>
Script
>
<
Script Type
=
"
Text / JavaScript
"
>
_uacct
=
"
UA-1192893-1
"
Urchintracker ();
Script
>
<
Title
>
No title document
Title
>
HEAD
>
<
Body
>
<
%
Set
di
=
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
"
Chain
"
,
-
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
"
Dend
"
,
-
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
"
HAN
"
,
-
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
"
SHAN
"
,
-
13878
D.add
"
Shao
"
,
-
13870
D.add
"
SHE
"
,
-
3859
D.add
"
SHEN
"
,
-
13847
D.add
"
Sheng
"
,
-
13831
D.add
"
Shi
"
,
-
13658
D.add
"
Shou
"
,
-
3611
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
"
Tun
"
,
-
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
"
WAN
"
,
-
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
"
"
,
-
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
Set
e
=
CreateObject
(
"
Scripting.dictionary
"
E.Add
"
a
"
,
-
20319
'
E.Add "a", - 20292
e.add
"
B
"
,
-
20283
'
E.Add "B", - 19784
e.add
"
c
"
,
-
19775
'
E.Add "C", - 19224
e.add
"
di
"
,
-
19218
'
E.Add "D", - 18722
e.add
"
e
"
,
-
18710
'
E.Add "E", - 18696
e.add
"
fly
"
,
-
18526
'
E.Add "f", - 18446
e.add
"
G
"
,
-
18239
'
E.Add "G", - 17928
e.add
"
hide
"
,
-
17922
'E.Add "H", - 17427
e.add
"
j
"
,
-
17417
'
E.Add "J", - 16647
e.add
"
k
"
,
-
16474
'
E.Add "K", - 16216
e.add
"
l
"
,
-
16212
'
E.Add "L", - 15652
e.add
"
M
"
,
-
15640
'
E.Add "M", - 15180
e.add
"
n
"
,
-
15165
'
E.Add "N", - 14926
e.add
"
o
"
,
-
14922
'
E.Add "O", - 14921
e.add
"
p
"
,
-
14914
'
E.Add "P", - 14645
e.add
"
Qi
"
,
-
14630
'
E.Add "Q", - 14151
e.add
"
r
"
,
-
14149
'
E.Add "R", - 14092
e.add
"
s
"
,
-
14090
'
E.Add "S", - 13326
e.add
"
t
"
,
-
13318
'
E.Add "T", - 12849
e.add
"
w
"
,
-
12838
'
E.Add "W", - 12585
e.add
"
x
"
,
-
12556
'
E.Add "X", - 11861
e.add
"
y
"
,
-
11847
'
E.Add "Y", - 11067
e.add
"
z
"
,
-
11055
'
E.Add "Z", - 10254
FUNCTION
g (NUM)
IF
Num
>
0
and
Num
<
160
THEN
G
=
CHR
(NUM)
Else
IF
Num
<-
20319
oral
Num
> -
10247
THEN
'
g = ""
G
=
CHR
(NUM)
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
=
""
Response.write
"
Enter the number of characters:
"
&
Len
(STR)
&
"
"
for
i
=
1
TO
Len
(STR) C
=
c
&
g (
ASC
(
MID
(Str, I,
1
)))))))
'
Response.write ASC (MID (STR, I, 1)) & "
" Next
END FUNCTION
FUNCTION
H (NUM)
IF
Num
>
0
and
Num
<
160
THEN
hide
=
CHR
(NUM)
Else
IF
Num
<-
20319
oral
Num
> -
10247
THEN
'
h = ""
hide
=
CHR
(NUM)
Else
a
=
E.Items B
=
E.keys
for
i
=
E.COUNT
-
1
TO
0
STEP
-
1
IF
A (i)
<=
Num
THEN
exit
for
NEXT
hide
=
B (i)
end
IF
end
IF
END FUNCTION
'
Function C (STR)
'
c = ""
'
"Response.write" Number of characters: "& len (str) &"
"
'
For i = 1 to Len (STR)
'
C = C & G (ASC (MID (STR, I, 1))))
'
'Response.write ASC (MID (STR, I, 1)) & "
"
'
NEXT
'
END FUNCTION
FUNCTION
f (STR) F
=
""
for
i
=
1
TO
Len
(STR)
IF
i
=
1
THEN
fly
=
fly
&
g (
ASC
(
MID
(Str, I,
1
)))))))
Else
IF
Len
(STR)
=
2
THEN
fly
=
fly
&
g (
ASC
(
MID
(Str, I,
1
)))))))
Else
fly
=
fly
&
hide
ASC
(
MID
(Str, I,
1
)))))))
end
IF
end
IF
NEXT
END FUNCTION
SZ
=
REQUEST
"
Hz
"
) Response.write
"
The characters entered are:
"
&
SZ
&
"
"
IF
Instr
(SZ,
"
(
"
)
<>
0
THEN
SZ
=
MID
(SZ,
1
,
Instr
(SZ,
"
(
"
)
-
1
)
end
IF
IF
Instr
(SZ,
"
(
"
)
<>
0
THEN
SZ
=
MID
(SZ,
1
,
Instr
(SZ,
"
(
"
)
-
1
)
end
IF
Pinyi
=
C (SZ) Email
=
f (SZ) Response.write
"
The first letter is:
"
&
Pinyi
&
"
"
Response.write
"
Number of characters:
"
&
Len
(Pinyi)
"
"
Response.write
"
Small write alphabet mode:
"
&
Lcase
(Pinyi)
&
"
"
Response.write
"
Name abbreviation mode:
"
&
Lcase
(email)%
>
<
Form Method
=
POST
>
Please enter Chinese here:
<
INPUT NAME
=
Hz
>
<
Br
>
GB2312 character conversion
FORM
>
Body
>
HTML
>
:
