<!--#include file="conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/getuc.asp"-->
<%dim str1,str2,bihua1,bihua2,bihua,tempstr
str1=request("str1")
str2=request("str2")
%>
<html>
<head>
<title>恋爱配对,两人关系，姓名缘分,缘分测试---便民查询网-www.99fad.cn</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"; }
.style4 {FONT-SIZE: 14px;color: #CCCCCC}
.style5 {FONT-SIZE: 14px; FONT-FAMILY: "Tahoma","Arial","sans-serif"; color: #FF6600;}
-->
</style>
<SCRIPT language=JavaScript>
<!--
function submitchecken() {
	if (document.zhuge.str1.value == "") {
		alert("请输入您的尊姓大名！");
		document.zhuge.str1.focus();
		return false;
		}
	if (document.zhuge.str2.value == "") {
		alert("请输入对方的姓名！");
		document.zhuge.str2.focus();
		return false;
		}
	if (document.zhuge.str1.value.length > 4) {
		alert("有你这样的名字吗？");
		document.zhuge.str1.focus();
		return false;
		}
	if (document.zhuge.str1.value.length < 2) {
		alert("有你这样的名字吗？");
		document.zhuge.str1.focus();
		return false;
		}
	if (document.zhuge.str2.value.length > 4) {
		alert("有他这样的名字吗？");
		document.zhuge.str2.focus();
		return false;
		}
	if (document.zhuge.str2.value.length < 2) {
		alert("有他这样的名字吗？");
		document.zhuge.str2.focus();
		return false;
		}
	re="请重新输入！";
	return true;
	}
//-->
</SCRIPT>
</head>
<body>
<%
if str1<>"" and str2<>"" then
on error resume next
bihua1=int(getnum(mid(str1,1,1)))
bihua1=bihua1+int(getnum(mid(str1,2,1)))
if mid(str1,3,1) <> "" then
bihua1=bihua1+int(getnum(mid(str1,3,1)))
if mid(str1,4,1) <> "" then
bihua1=bihua1+int(getnum(mid(str1,4,1)))
end if
end if
bihua2=int(getnum(mid(str2,1,1)))
bihua2=bihua2+int(getnum(mid(str2,2,1)))
if mid(str2,3,1) <> "" then
bihua2=bihua2+int(getnum(mid(str2,3,1)))
if mid(str2,4,1) <> "" then
bihua2=bihua2+int(getnum(mid(str2,4,1)))
end if
end if
bihua=abs(bihua1-bihua2)
bihua=int(bihua)
do while bihua>=26
bihua=bihua-26
loop
bihua=cstr(bihua)
select case bihua
case "0" tempstr="亲密无间"
case "1" tempstr="永远和你在一起"
case "2" tempstr="水火不相容"
case "3" tempstr="知心朋友"
case "4" tempstr="心上人"
case "5" tempstr="帮你做事的人"
case "6" tempstr="帮你的人"
case "7" tempstr="面和心不合"
case "8" tempstr="男女关系不正常"
case "9" tempstr="情投意合"
case "10" tempstr="关系马虎"
case "11" tempstr="尊敬你的人"
case "12" tempstr="爱你的人"
case "13" tempstr="适合你的人"
case "14" tempstr="说你坏话的人"
case "15" tempstr="克星"
case "16" tempstr="救星"
case "17" tempstr="忠心的人"
case "18" tempstr="狼心狗肺的人"
case "19" tempstr="单相思"
case "20" tempstr="山盟海誓"
case "21" tempstr="情敌"
case "22" tempstr="服从你的人"
case "23" tempstr="永远在一起"
case "24" tempstr="伴终生"
case "25" tempstr="恨你又爱你"
case else tempstr="无法测算！"
end select
%>
<table width="100%" height="95%" border="0" align="center" cellpadding="2" cellspacing="1" bgcolor="#C0DBEF">
<tr bgcolor="#EFF8FE">
<td height="50" align="center"><a href="two.asp" target="_blank"><span class="style3"><font color="cc6600">恋爱配对</font></span></a>&nbsp;&nbsp;<span class="style3">by</span><a href="index.htm"><span class="style3">99Fad.cn 便民网</span></a></td>
</tr>
<tr bgcolor="#EFF8FE">
<td align="center" bgcolor="#EFF8FE"><br>
<span class="style3">
<table width="80%" height="100"  border="0" cellpadding="0" cellspacing="1" bgcolor="#CCCCCC">
  <tr>
    <td rowspan="2" bgcolor="#FFFFFF"><a href="index.htm"><span class="style3">99Fad.cn 便民网</span></a><span class="style3">解析</span></td>
    <td bgcolor="#FFFFFF"><span class="style3">您的姓名：</span></td>
    <td bgcolor="#FFFFFF"><%="&nbsp;&nbsp;<span class='style3'><font color='#cc6600'>"&str1&"</font></span>"%></td>
    <td bgcolor="#FFFFFF"><span class="style3">对方的姓名：</span></td>
    <td bgcolor="#FFFFFF"><%="&nbsp;&nbsp;<span class='style3'><font color='#cc6600'>"&str2&"</font></span>"%></td>
  </tr>
  <tr>
    <td bgcolor="#FFFFFF"><span class="style3">关系暗示：</span></td>
    <td colspan="3" bgcolor="#FFFFFF"><%="&nbsp;&nbsp;<span class='style3'><font color='#ff0000'>"&tempstr&"</font></span>"%><span class="style4">&nbsp;&nbsp;（ 警告:此测试纯属娱乐,不可太信哦！）</span></td>
  </tr>
</table>
</span>
</td>
</tr>
<form name="zhuge" method="post" action="" onSubmit="return submitchecken();">
<tr bgcolor="#EFF8FE">
<td height="30" align="center" valign="middle" bgcolor="#EFF8FE">
  <span class="style3">您的名字：
  <input class="style5" name="str1" value="<%=xing&ming%>" type="text" id="str1" onKeypress="if ((event.keyCode != 13 && event.keyCode < 160)) event.returnValue = false;">
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="style3">对方的名字：</span>
  <input name="str2" type="text" id="str2" onKeypress="if ((event.keyCode != 13 && event.keyCode < 160)) event.returnValue = false;">
  <input type="submit" name="Submit" value="立即测算" style='cursor:hand;COLOR: #ff0000;'>&nbsp;&nbsp;
  <input type="button" name="Submit2" value="重新开始" style='cursor:hand;' onClick="javascript:window.location.href='two.asp'">&nbsp;&nbsp;
  <input type="button" name="Submit3" value="返回首页" style='cursor:hand;' onClick="javascript:top.location.href='/'">
</span>
</td>
</tr>
</form>
</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"><a href="two.asp" target="_blank"><span class="style3"><font color="cc6600">恋爱配对</font></span></a>&nbsp;&nbsp;<span class="style3"></span><a href="index.htm"><span class="style3">99Fad.cn 便民网</span></a></td>
</tr>
<tr bgcolor="#EFF8FE">
<td bgcolor="#EFF8FE"><br><span class="style3">这里可以计算出你和另一个人的关系，准的邪门了！预测的方法很简单，将你们姓名在下面输入。 十分准确啊！快来试试吧！</span></td>
</tr>
<form name="zhuge" method="post" action="" onSubmit="return submitchecken();">
<tr bgcolor="#EFF8FE">
<td height="30" align="center" valign="middle" bgcolor="#EFF8FE">
  <span class="style3">您的名字：
  <input class="style5" name="str1" value="<%=xing&ming%>" type="text" id="str1" onKeypress="if ((event.keyCode != 13 && event.keyCode < 160)) event.returnValue = false;">
 &nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<span class="style3">对方的名字：</span>
  <input name="str2" type="text" id="str2" onKeypress="if ((event.keyCode != 13 && event.keyCode < 160)) event.returnValue = false;">
  <input type="submit" name="Submit" value="立即测算" style='cursor:hand;COLOR: #ff0000;'>&nbsp;&nbsp;
  <input type="button" name="Submit2" value="重新开始" style='cursor:hand;' onClick="javascript:window.location.href='two.asp'">&nbsp;&nbsp;
  <input type="button" name="Submit3" value="返回首页" style='cursor:hand;' onClick="javascript:top.location.href='/'">
</span>
</td>
</tr>
</form>
</table>
<!--#include file="copyright.asp"-->
</body>
</html>
<%end if%>
<%
'输出
If Err Then
response.Write "两人关系查询内容出错!"
err.Clear
Response.End
End If
%>
