<!--#include file="conn.asp"-->
<!--#include file="inc/getuc.asp"-->
<!--#include file="inc/function.asp"-->
<html>
<head>
<title>生日测算,生日算命,生辰的秘密,生日密码</title>
<META name=keywords content="生日测算,生日算命,生辰的秘密,生日密码">
<META http-equiv=Content-Type content="text/html; charset=gb2312">
<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>
</head>
<body>
<%
if xing<>"" then
%>
<%
'获取月日信息
dim tempbirth
tempbirth=yue1
if len(ri1)=1 then
ri1="0"&ri1
end if
tempbirth=tempbirth&ri1
%>
<%
on error resume next
'生辰秘密
dim sqlbirth,birthcontent
sqlbirth="select content from birth where day='"&tempbirth&"'"
set rsbirth=conn.execute(sqlbirth)
if not (rsbirth.bof and rsbirth.eof) then
birthcontent=rsbirth("content")
end if
%>
<%
'输出
If Err Then
response.Write "生辰秘密查询内容出错!"
err.Clear
Response.End
End If
%>
<table width="100%" height="95%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#C0DBEF">
<tr bgcolor="#EFF8FE">
<td height="50" align="center">
<span class="style3">
<%
dim age,str
age=(year(now())-nian1)+1
str="<font color=cc6600>"&xing&"</font>"&"<font color=cc6600>"&ming&"</font>"&","&age&"岁，"&"您出生于公历 "&nian1&"年 "&yue1&"月 "&ri1&"日"&hh1&"点 "&"&nbsp;&nbsp;"
str=str&"农历 "&nian2&"年 "&yue2&"月 "&ri2&"日 "
str=str&"您的属相:"&sx&"<br>"
response.write "<span class=style3>"&str&"</span>"
%>
</span></td>
</tr>
<tr bgcolor="#EFF8FE">
  <td bgcolor="#EFF8FE"><span class="style3">
<%=rep(birthcontent)%>
</span></td>
</tr>
</table>
<!--#include file="copyright.asp"-->
</body>
</html>
<%else%>
<table width="100%" height="95%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#C0DBEF">
<tr bgcolor="#EFF8FE">
<td height="50" align="center" class="smallTxt">对不起，要测算请返回输入您的用户数据!<a href="youinfo.asp"><font color="#FF0000">点击这里</font></a></td>
</tr>
<tr bgcolor="#EFF8FE">
  <td bgcolor="#EFF8FE"><span class="style3">您想知道您在这一天出日会有什么样的将来吗？<br><br>用这个测测吧。包括健康、爱情、事业、优点、缺点、同日出生的世界名人等信息。<br>但我一直相信把手握起来命运就在自己手上了，把手摊开向天，只好有“听天由命”。不要遇到困难就把双手摊开，然后抱怨老天不公。应该紧握双手坚信命运只在我手。  
</span></td>
</tr>
</table>
<!--#include file="copyright.asp"-->
</body>
</html>
<%end if%>