<%@ CODEPAGE = "936" %>
<%title="网名测试"
 keyword="网名测试-测试网名-网名与性格"
%>
<style type="text/css">
<!--
BODY{
scrollbar-face-color: #d4d0c8;
scrollbar-highlight-color:#D4D0C8 ;
scrollbar-shadow-color:#d6d6d6 ;
scrollbar-3dlight-color:#e6e6e6 ;
scrollbar-arrow-color:#006699  ;
scrollbar-track-color:#dfdfdf ;
scrollbar-darkshadow-color: #808080; 
}
A:link {font-family:"Verdana",  "宋体"; COLOR: #000000;  font-size: 12px;  TEXT-DECORATION: none }
A:visited {font-family: "Verdana", "宋体";	COLOR: #000000; FONT-SIZE:12px; TEXT-DECORATION: none }
A:active {font-family: "Verdana", "宋体"; COLOR: #000099; FONT-SIZE: 12px; TEXT-DECORATION: none }
A:hover {font-family: "Verdana", "宋体"; COLOR: #dd0000>; FONT-SIZE: 12px; TEXT-DECORATION: underline }
.smallTxt{FONT-SIZE: 11px; FONT-FAMILY: "Tahoma","Arial","sans-serif"}
.style3 {FONT-SIZE: 14px; FONT-FAMILY: "Tahoma","Arial","sans-serif"; }
-->
</style>

  <body bgcolor="#EFF8FE">

  <form name="form1" method="post" action="wm.asp">
  <table width="776" border="0" align="center" cellpadding="0" cellspacing="0">
     <tr> 
      <td colspan="2" align="center" bgcolor="#EFF8FE">　</td>
    </tr>
    <tr> 
      <td colspan=2 align="center" class=tdc bgcolor="#EFF8FE">

<%
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 

Set fso = CreateObject("Scripting.FileSystemObject")
filename="count.txt"
count=getfile(filename)



netname=trim(request("netname"))
if netname<>"" then
counta=count+1
call savefile(filename,counta)
response.write "<div align=center style='font-size:14px;color:#ff0000;'>网名："&netname&"&nbsp;          性格："
for k= 1 to len(netname)
nstr=mid(netname,k,1)
zm=left(c(nstr),1)
response.write test(zm)&"；"
next
response.write "</div>"
end if
set fso=nothing



function test(str)
select case str
case "a"
test="好奇心强，专一"
case "b"
test="老实，沉默"
case "c"
test="可爱，较明显的自恋"
case "d"
test="温柔，乖巧"
case "e"
test="会拍马屁，攀关系"
case "f"
test=" 有抱负，志气高"
case "g"
test="大丈夫主义者"
case "h"
test=" 自立，自强，可依靠 "
case "i"
test=" 有点懒惰"
case "j"
test=" 煽情高手"
case "k"
test="古怪，求新"
case "l"
test="圆滑"
case "m"
test="反复无常，喜欢模仿神秘人物举动的小孩子性格，但是常常被宠爱"
case "n"
test="不贪图安逸，能想到别人想不到的东西"
case "o"
test="勤劳肯干，活跃"
case "p"
test="认为朋友和恋人是最重要的，是他们的特点"
case "q"
test="超级赶时髦者，无敌扫旧派" 
case "r"
test="固执，略有才气"
case "s"
test="心胸宽大，有深藏不露的自恋"
case "t"
test="热爱青春，喜欢活力" 
case "u"
test="不耻下问"
case "v"
test="好静，有点表里不一"
case "w"
test="比较糊涂，容易感情用事" 
case "x"
test="有恒心，害怕做重复的事情，哪怕是别人重复他做过的事" 
case "y"
test="乐天派呀！非同一般的乐天"
case "z"
test="老实，想问题容易兜圈子"
end select
end function
function getfile(filename)
whichfile=server.mappath(filename)
Set txt = fso.OpenTextFile(whichfile,1)
getfile = txt.Readall
txt.Close
end function
function savefile(filename,str)
whichfile=server.mappath(filename)
Set MyFile = fso.CreateTextFile(whichfile,True)
MyFile.WriteLine(str)
MyFile.Close
end function




%>							
								  
								  
								   <br> 
 <br> 
 <br>                              
                                    <form name="form1" method="post" action="">
                                      <div align="center" class="style3">请输入你的网名：
                                        <input name="netname" type="text" id="netname">&nbsp;&nbsp;
                                        <input type="submit" name="Submit" value="测试">
                                      </div>
                                    </form>
                                    <p align="center" class="titletext">                                    <blockquote>
                                      <p class="style3">　</p>
                                        <p class="style3">　</p>
                                        <p class="style3">目前共有：<b><%=count%></b>位网友进行了测试！！<br>请把你的发现告诉你的5个QQ网友！祝你和你的家人、朋友幸福安康!!!</p>
                                        <p class="style3">本站网址：http://www.99fad.cn</p>
                                        <p> 
      </td>
    </tr>
<br>
<br>
<br>
<br>
<br>
<br>
<br>
<!--#include file="copyright.asp"-->

    <tr align="center"> 
      <td colspan="2" class=tdc align="center" height="42">　</td>
    </tr>

    <tr align="center" valign="bottom"> 
      <td colspan="2" class=tdc height="29" > </td>
    </tr>
  </table>
</form>
