电话Or手机号码吉凶查询源码

作者:懒鱼日期:2007-05-03

字体大小: 小中大

吉凶数据来自互联网,懒如只是负责把它变得更加简单化.如有侵权,请与我联系....

所以测试仅供娱乐,如有雷同,实属本人及作者荣幸!

源码演示效果:http://www.huison.cn/tool/1.asp

程序代码

<%dim aa(79)
aa(0)="大展鸿图．可获成功　吉"
aa(1)="一盛一衰．劳而无功　凶"
aa(2)="蒸蒸日上．百事顺遂　吉"
aa(3)="坎坷前途．苦难折磨　凶"
aa(4)="生意欣荣．名利双收　吉"
aa(5)="天降幸运．可成大功　吉"
aa(6)="和气致祥．必获成功　吉"
aa(7)="贯彻志望．成功可期　吉"
aa(8)="独营无力．财利无望　凶"
aa(9)="空费心力．徒劳无功　凶"
aa(10)="稳健着实．必得人望　吉"
aa(11)="薄弱无力．谋事难成　凶"
aa(12)="天赋吉运．能得人望　吉"
aa(13)="是成是败．惟靠坚毅　凶"
aa(14)="大事成就．一定兴隆　吉"
aa(15)="成就大业．名利双收　吉"
aa(16)="有贵人助．可得成功　吉"
aa(17)="顺利昌隆．百事亨通　吉"
aa(18)="内外不合．障碍重重　凶"
aa(19)="历尽艰难．焦心忧劳　凶"
aa(20)="专心经营．善用智能　吉"
aa(21)="怀才不遇．事不如意　凶"
aa(22)="名显四方．终成大业　吉"
aa(23)="须靠自力．能奏大功　吉"
aa(24)="天时地利．再得人格　吉"
aa(25)="波澜起伏．凌驾万难　凶"
aa(26)="一盛一衰．可守成功　凶带吉"
aa(27)="青云直上．才略奏功　吉"
aa(28)="吉凶参半．得失相伴　凶"
aa(29)="名利双收．大业成就　吉"
aa(30)="池中之龙．成功可望　吉"
aa(31)="智能慎始．必可昌隆　吉"
aa(32)="灾难不绝．难望成功　凶"
aa(33)="中吉之数．进退保守　吉"
aa(34)="波澜重叠．常陷穷困　凶"
aa(35)="逢凶化吉．风调雨顺　吉"
aa(36)="名虽可得．利则难获　凶带吉"
aa(37)="光明坦途．指日可待　吉"
aa(38)="一盛一衰．浮沉不定　吉带凶"
aa(39)="天赋吉运．前途无限　吉"
aa(40)="事业不专．十九不成　吉带凶"
aa(41)="忍耐自重．转凶为吉　吉带凶"
aa(42)="事难遂愿．贪功好进　凶"
aa(43)="绿叶发枝．一举成名　吉"
aa(44)="坎坷不平．艰难重重　凶"
aa(45)="有贵人助．可成大业　吉"
aa(46)="名利俱全．繁荣富贵　吉"
aa(47)="遇吉则吉．遇凶则凶　凶"
aa(48)="吉凶互见．一成一败　吉带凶"
aa(49)="一盛一衰．浮沉不常　吉带凶"
aa(50)="雨过天青．即获成功　吉"
aa(51)="盛衰参半．先吉后凶　吉带凶"
aa(52)="虽倾全力．难望成功　凶"
aa(53)="外观隆昌．内隐祸患　吉带凶"
aa(54)="事与愿违．终难成功　凶"
aa(55)="努力经营．时来运转　吉"
aa(56)="浮沉多端．始凶终吉　凶带吉"
aa(57)="遇事犹疑．难望成事　凶"
aa(58)="心迷意乱．难定方针　凶"
aa(59)="云遮半月．百隐风波　吉带凶"
aa(60)="烦闷懊恼．事事难展　凶"
aa(61)="万物化育．繁荣之象　吉"
aa(62)="十九不成．徒劳无功　凶"
aa(63)="吉运自来．能享盛名　吉"
aa(64)="内外不和．信用缺乏　凶"
aa(65)="事事如意．富贵自来　吉"
aa(66)="不失先机．可望成功　吉"
aa(67)="动摇不安．常陷逆境　凶"
aa(68)="惨淡经营．难免贫困　凶"
aa(69)="吉凶参半．惟赖勇气　吉带凶"
aa(70)="得而复失．难以安顺　凶"
aa(71)="安乐自来．自然吉祥　吉"
aa(72)="如无智谋．难望成功　凶"
aa(73)="吉中带凶．进不如守　吉带凶"
aa(74)="此数大凶．破产之象　凶"
aa(75)="先苦后甘．不致失败　吉带凶"
aa(76)="有得有失．华而不实　吉带凶"
aa(77)="前途无光．希望不大　凶"
aa(78)="得而复失．枉费心机　吉带凶"
aa(79)="最极之数．能得成功　吉"

dim phone
phone=trim(request.form("phone"))

if len(phone) = 11 then
  if IsNumeric(phone) then
  phonee = right(phone,4)
  phonee = phonee / 80
  phonee = split(phonee,".")(1)
  phonee = "0." & phonee
  phonee = phonee * 80
  jieguo = aa(phonee)

  else
  jieguo="错误的电话Or手机号码!"
  end if
elseif len(phone)=0 then
jieguo=""
else
jieguo="请确认号码位数(电话请加区号)!"
end if
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<meta name="keywords" content="手机号码吉凶懒鱼胡国良" />
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>手机号码吉凶懒鱼的池塘</title>
<style type="text/css">

</style>
</head>

<body>
<form id="form1" name="form1" method="post" action="">
  <table border="0" align="center" cellpadding="0" cellspacing="0">
    <tr>
      <td width="105">电话Or手机号码： </td>
      <td width="150"><input type="text" id="a" name="phone" /></td>
      <td width="120" align="left"><input name="Submit" type="image" value="提交" src="login.jpg" alt="我来测试号码!" scr="login.jpg" /></td>
    </tr>
  </table>
</form>
<p>您的结果：<font color="#FF0000"><%=jieguo%>
</font> <br />
<br />
<font color="#999999"> （仅供娱乐，如有雷同，实属荣幸！）</font></p>
<p> </p>
<p><a href="http://www.huison.cn/blog" target="_blank">懒鱼的博客</a></p>
</body>
</html>

转载请注明懒鱼的池塘!

[本日志由 Huison 于 2008-09-22 01:18 PM 编辑]