<!--#include file="../Include/Conno.asp" -->
<!--#include file="../Include/const.asp" -->
<!--#include file="../Include/char.asp" -->

<%
m_grade=Session("Curgrade")
m_ID = Session("CurUserID")
m_username=trim(CheckStr(request("username")))

	 if m_username="" then
     Call Msgbox("对不起，参数不足错误！",1)
    Response.end
     end if
	mc_sql="SELECT * FROM T_Member where f_username='"&m_username&"'"
	set rs=server.createobject("adodb.recordset")
    rs.open mc_sql,conn,1,1
	if rs.eof then
	Call Msgbox("对不起，无此会员信息！",5)
	Response.Redirect "../Photo"
    Response.end
	end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title> - 会员信息</title>
<link href="../css/member.css" rel="stylesheet" type="text/css">
<script language="JavaScript" type="text/JavaScript">
<!--
function MM_preloadImages() { //v3.0
  var d=document; if(d.images){ if(!d.MM_p) d.MM_p=new Array();
    var i,j=d.MM_p.length,a=MM_preloadImages.arguments; for(i=0; i<a.length; i++)
    if (a[i].indexOf("#")!=0){ d.MM_p[j]=new Image; d.MM_p[j++].src=a[i];}}
}

function MM_swapImgRestore() { //v3.0
  var i,x,a=document.MM_sr; for(i=0;a&&i<a.length&&(x=a[i])&&x.oSrc;i++) x.src=x.oSrc;
}

function MM_findObj(n, d) { //v4.01
  var p,i,x;  if(!d) d=document; if((p=n.indexOf("?"))>0&&parent.frames.length) {
    d=parent.frames[n.substring(p+1)].document; n=n.substring(0,p);}
  if(!(x=d[n])&&d.all) x=d.all[n]; for (i=0;!x&&i<d.forms.length;i++) x=d.forms[i][n];
  for(i=0;!x&&d.layers&&i<d.layers.length;i++) x=MM_findObj(n,d.layers[i].document);
  if(!x && d.getElementById) x=d.getElementById(n); return x;
}

function MM_swapImage() { //v3.0
  var i,j=0,x,a=MM_swapImage.arguments; document.MM_sr=new Array; for(i=0;i<(a.length-2);i+=3)
   if ((x=MM_findObj(a[i]))!=null){document.MM_sr[j++]=x; if(!x.oSrc) x.oSrc=x.src; x.src=a[i+2];}
}
//-->
</script>
<style type="text/css"></style>
</head>

<body onLoad="MM_preloadImages('../images/member/hy_b_1b.gif','../images/member/hy_b_3b.gif','../images/member/cl_03.gif','../images/member/cl_04.gif','../images/member/cl_05.gif','../images/member/cl_06.gif','../images/member/cl_07.gif','../images/member/cl_08.gif','../Images/member/cl_03.gif','../Images/member/cl_04.gif','../Images/member/cl_05.gif','../Images/member/cl_06.gif','../Images/member/cl_07.gif','../Images/member/cl_08.gif')">
<!--#include file="../include/top.asp" -->
<!--#include file="../include/member_top.asp" --><!--#include file="club_top.asp" -->
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="112" rowspan="3"><img src="../Images/member/cl_01.gif" width="112" height="200"></td>
    <td width="132" rowspan="3"><img src="../Images/member/cl_02.gif" width="132" height="200"></td>
    <td width="536"><table width="536" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="85"><a href="club_member.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image9','','../Images/member/cl_03.gif',1)"><img src="../Images/member/cl_03.gif" name="Image9" width="85" height="37" border="0"></a></td>
          <td width="90"><a href="club_member_hide.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image10','','../Images/member/cl_04.gif',1)"><img src="../Images/member/club_a_04.gif" name="Image10" width="90" height="37" border="0"></a></td>
          <td width="88"><a href="club_member_ilike.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image11','','../Images/member/cl_05.gif',1)"><img src="../Images/member/club_a_05.gif" name="Image11" width="88" height="37" border="0"></a></td>
          <td width="88"><a href="club_member_amity.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image12','','../Images/member/cl_06.gif',1)"><img src="../Images/member/club_a_06.gif" name="Image12" width="88" height="37" border="0"></a></td>
          <td width="89"><a href="club_member_photo.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image13','','../Images/member/cl_07.gif',1)"><img src="../Images/member/club_a_07.gif" name="Image13" width="89" height="37" border="0"></a></td>
          <td width="86"><a href="club_member_diary.asp?username=<%=m_username%>" onMouseOut="MM_swapImgRestore()" onMouseOver="MM_swapImage('Image14','','../Images/member/cl_08.gif',1)"><img src="../Images/member/club_a_08.gif" name="Image14" width="86" height="37" border="0"></a></td>
          <td><img src="../Images/member/cl_09.gif" width="10" height="37"></td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td><img src="../Images/member/cl_10.gif" width="536" height="5"></td>
  </tr>
  <tr>
    <td><table width="536" border="0" cellspacing="0" cellpadding="0">
        <tr>
          <td width="10"><img src="../Images/member/cl_11.gif" width="16" height="158"></td>
          <td width="493" bgcolor="#FFFFFF"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td width="69" height="30" class="p1">编　　号：</td>
                <td width="98"> 
                  <%
				m_id=(rs("f_id")*574)-int(rs("f_id")/7)'ID算法
				%>
                  <%=m_id%></td>
                <td width="68" class="p1">会 员 名:</td>
                <td width="112"><%=rs("f_username")%></td>
                <td width="68" class="p1">会员类型：</td>
                <td width="78"> 
                  <% if rs("f_grade")=1 then %>
                  <font color="#FF0000">VIP会员</font> 
                  <% else %>
                  普通会员 
                  <% end if %>
                </td>
              </tr>
              <tr> 
                <td height="1" colspan="6" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td height="30" class="p1">注册时间：</td>
                <td><%=rs("F_RegTime")%></td>
                <td class="p1">最后登陆：</td>
                <td colspan="3"><%=rs("F_LastLoginTime")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="6" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td height="1" colspan="6" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td height="50" colspan="6"><table width="72%"  border="0" align="center" cellpadding="0" cellspacing="0">
                    <tr> 
                      <td width="180"><a onClick="return confirm('您确定要将“<%=rs("f_username")%>”加为好友吗？他将有可能看到您的个人隐私。')" href="addfriend.asp?username=<%=rs("f_username")%>&flag=1"><img src="../Images/member/club_b_5.gif" width="120" height="30" border="0"></a></td>
                      <td width="180"><a onClick="return confirm('您确定要将“<%=rs("F_username")%>”打入您的黑名单吗？他将无法给您发送短讯。')" href="addfriend.asp?username=<%=rs("f_username")%>&flag=0"><img src="../Images/member/club_b_6.gif" width="120" height="30" border="0"></a></td>
                      <td width="180"><a href="message_send.asp?re_username=<%=rs("f_username")%>"><img src="../Images/member/club_b_7.gif" width="120" height="30" border="0"></a></td>
                    </tr>
                  </table></td>
              </tr>
            </table></td>
          <td width="27"><img src="../Images/member/cl_13.gif" width="27" height="158"></td>
        </tr>
    </table></td>
  </tr>
  <tr bgcolor="#59C601">
    <td height="1" colspan="3"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td height="10" valign="top"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td width="420"><img src="../Images/member/club_b_8.gif" width="167" height="42"></td>
    <td><img src="../Images/member/club_b_9.gif" width="167" height="42"></td>
  </tr>
  <tr>
    <td></td>
    <td height="1" background="images/line_02.gif"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td width="420" align="center" valign="top"><table width="400" border="0" cellpadding="0" cellspacing="5" bgcolor="f4f4f4">
      <tr>
        <td bgcolor="#FFFFFF"><table width="100%"  border="0" cellspacing="3" cellpadding="0">
              <tr> 
                <td width="72" height="20" align="left" class="p1">真实姓名：</td>
                <td width="100" align="left">
				<% if Session("Curgrade")=1 and m_ID<>"" then %>				
				<%=rs("f_realname")%>
				<% else %>
                  [<font color="#FF0000">您的等级不够</font>] 
                  <% end if %>
				</td>
                <td width="71" align="left" class="p1">英文名：</td>
                <td colspan="2" align="left"><%=rs("f_erealname")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td width="72" height="20" align="left" class="p1">性　　别：</td>
                <td width="100" align="left"> <% if rs("f_sex")="1" then %>
                  男 
                  <% else %>
                  女 
                  <% end if %> </td>
                <td width="71" align="left" class="p1">血　　型：</td>
                <td width="132" colspan="2" align="left"><% if rs("f_weight")<>"" then%><%=rs("f_blood")%>型<% end if %></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td height="20" align="left" class="p1">民　　族：</td>
                <td align="left"><%=rs("f_nation")%></td>
                <td align="left"><span class="p1">出生日期：</span></td>
                <td align="left"><%=rs("f_birthday")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td width="72" height="20" align="left" class="p1">婚姻状况：</td>
                <td width="100" align="left"><%=rs("f_marry")%></td>
                <td width="71" align="left" class="p1">星　　座：</td>
                <td colspan="2" align="left"><%=rs("f_star")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
			     <tr> 
                <td width="72" height="20" align="left" class="p1">学　　历：</td>
                <td width="100" align="left"><%=rs("f_edu")%></td>
                <td width="71" align="left" class="p1">QQ/ICQ：</td>
                <td colspan="2" align="left">
				<% if Session("Curgrade")=1 and m_ID<>"" then %>
				<%=rs("f_qq")%>
				<% else %>
                  [<font color="#FF0000">您的会员等级不够</font>] 
                  <% end if %></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
             
              <tr> 
                <td width="72" height="20" align="left" class="p1">身　　高：</td>
                <td width="100" align="left"><% if rs("f_height")<>"" then%><%=rs("f_height")%>cm<% end if %></td>
                <td width="71" align="left" class="p1">体　　重：</td>
                <td colspan="2" align="left"><% if rs("f_weight")<>"" then%><%=rs("f_weight")%>kg<% end if %></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
			   <tr> 
                <td width="72" height="20" align="left" class="p1">现所在地：</td>
                <td colspan="4" align="left"><%=rs("f_area")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td width="72" height="20" align="left" class="p1">E-mail　：</td>
                <td colspan="4" align="left">
					<% if Session("Curgrade")=1 and m_ID<>"" then %>
				<%=rs("f_email")%>
				<% else %>
                  [<font color="#FF0000">您的会员等级不够</font>] 
                  <% end if %>
				
				</td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td width="72" height="20" align="left" class="p1">语言能力：</td>
                <td colspan="4" align="left"><%=rs("f_language")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>			
              <tr> 
                <td width="72" height="20" align="left" class="p1">自我描述：</td>
                <td colspan="4" align="left"><%=rs("f_memo")%></td>
              </tr>
              <tr> 
                <td height="1" colspan="5" align="left" background="images/line.gif"></td>
              </tr>
              <tr> 
                <td width="72" height="20" align="left" class="p1">加入目的：</td>
                <td colspan="4" align="left"><%=rs("f_motive")%></td>
              </tr>
            </table></td>
      </tr>
    </table></td>
    <td width="360" align="center"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td>&nbsp;</td>
      </tr>
    </table>      <table width="279" border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td colspan="2" rowspan="2"><img src="../Images/member/club_ph_01.gif" width="34" height="26"></td>
        <td width="209" align="right"><img src="../Images/member/club_ph_02.gif" width="168" height="14"></td>
        <td width="36" colspan="2" rowspan="2"><img src="../Images/member/club_ph_03.gif" width="36" height="26"></td>
      </tr>
      <tr>
        <td height="12" background="images/club_ph_04.gif"></td>
      </tr>
      <tr>
        <td width="21" valign="top"><img src="../Images/member/club_ph_05.gif" width="21" height="174"></td>
        <td width="13" background="images/club_ph_06.gif">&nbsp;</td>
          <td align="center"> 
            <%
			set rs_cn=conn.Execute("select top 1 f_photo from T_member_photo where f_username='"&m_username&"' and f_ischeck=1 order by f_regtime desc") 
            if not rs_cn.eof then
			        if Session("Curgrade")=1 and m_ID<>"" then
			        %>
            <a href="club_member_photo.asp?username=<%=m_username%>"><img src="../photo/MemberPhoto/<%=Server.URLEncode(rs_cn("f_photo"))%>" width="250" height="262" border="0"></a> 
                   <% else %>
				   <B><font color="#FF0000">您的会员等级不够!</font></B>
				    <%
			         end if
			 else 				 
			 %>
            <SPAN 
                  style="FONT-SIZE: 14px"><B>还没有上传照片！！</B></SPAN> 
            <%
				  end if
				  rs_cn.close
				   %>
		  </td>
        <td width="12" background="images/club_ph_08.gif"></td>
        <td valign="bottom"><img src="../Images/member/club_ph_09.gif" width="24" height="178"></td>
      </tr>
      <tr>
        <td colspan="2" rowspan="2"><img src="../Images/member/club_ph_10.gif" width="34" height="24"></td>
        <td height="10" background="images/club_ph_11.gif"></td>
        <td colspan="2" rowspan="2"><img src="../Images/member/club_ph_12.gif" width="36" height="24"></td>
      </tr>
      <tr>
        <td align="left"><img src="../Images/member/club_ph_13.gif" width="146" height="14"></td>
      </tr>
    </table></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td height="10" valign="top"></td>
  </tr>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr>
    <td width="420" align="center"><table width="400" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
      <tr bgcolor="#AD7000">
        <td height="3" colspan="3" bgcolor="#999900"></td>
      </tr>
      <tr bgcolor="f4f4f4">
          <td height="25" colspan="3" align="left" valign="bottom" bgcolor="#EFF7DF" class="p4">&nbsp;<img src="../Images/member/icon_cafeleaf_yellow.gif" width="14" height="17"> 
            心灵测试</td>
      </tr>
      <tr>
        <td width="530" height="1" background="images/line_02.gif" class="p4"></td>
      </tr>
    </table>      <table width="400" border="0" cellpadding="0" cellspacing="5" bgcolor="#EFF7DF">
      <tr>
        <td height="100" bgcolor="#FFFFFF"><table width="100%"  border="0" cellspacing="3" cellpadding="0">
              <%
			 	set rs_t=server.createobject("adodb.recordset")
					sql_t="select top 10 * from t_test order by f_hits desc"
					rs_t.open sql_t,conn
					if not rs_t.eof then
					do while not rs_t.eof 
			 %>
              <tr> 
                <td align="left">  · <A 
      title=<%=rs_t("F_Title")%>
      onclick="window.open(this,'','width=400,height=380,top=100,left=100,location=no,menubar=no,toolbar=no,titlebar=no,scrollbars=no');return false;" 
      href="club_viewtest.asp?id=<%=rs_t("F_id")%>" 
      target=_blank><%=rs_t("F_Title")%></A> </td>
              </tr>
			  <%
			  rs_t.movenext
			  loop
			  end if
			  rs_t.close
			  set rs_t=nothing 
			  %>
            </table></td>
      </tr>
    </table></td>
    <td><table width="350" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
      <tr bgcolor="#AD7000">
        <td height="3" colspan="3" bgcolor="#63BA03"></td>
      </tr>
      <tr bgcolor="f4f4f4">
          <td height="25" colspan="3" align="left" valign="bottom" bgcolor="#F3FFE6" class="p4">&nbsp;<img src="../Images/member/icon_cafeleaf.gif" width="14" height="17"> 
            <a href="/bbs/">最新论坛帖子</a></td>
      </tr>
      <tr>
        <td width="530" height="1" background="images/line_02.gif" class="p4"></td>
      </tr>
    </table>
      <table width="350" border="0" cellpadding="0" cellspacing="5" bgcolor="#F3FFE6">
        <tr>
          <td height="100" bgcolor="#FFFFFF"><script src="../bbs/Dv_News.asp?GetName=newtopic"></script></td>
        </tr>
      </table></td>
  </tr>
</table>
<!--#include file="../Include/Bottom.asp" -->
</body>
</html>
