<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/Conn_User.asp"-->

<%
'请勿改动下面这三行代码
const ChannelID=3
Const ShowRunTime="Yes"
SkinID=0
MaxPerPage=12
dim UserID
dim mdid,htm
mdid=trim(request("mdid"))
htm=trim(request("htm"))
UserID=trim(request("UserID"))
if UserID="" then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>请指定UserID</li>"
	call WriteErrMsg()
	response.end
else
	UserID=Clng(UserID)
end if

indexs="indexs.asp"
if UserID="del" then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>该用户已被管理员删除</li>"
	call WriteErrMsg()
	response.end
else
	UserID=Clng(UserID)
end if
strFileName="UserInfo.asp?UserID=" & UserID
sql="select * from " & db_User_Table & " where " & db_User_ID & "=" & UserID
set rs=server.createobject("adodb.recordset")
rs.open sql,Conn_User,1,3
if cint(Request.Cookies("asp163")("userhits")) <> userid then
rs(db_User_hits)=rs(db_User_hits)+1
Response.Cookies("asp163")("userhits") = userid
rs.update
else
end if
if rs.bof and rs.eof then
	FoundErr=True
	ErrMsg=ErrMsg & "<br><li>找不到指定的用户<li>"
else
    photo=rs(db_User_photok)
	UserName=rs(db_User_Name)
	PageTitle=  UserName &"的个人主页"
	

%>
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=PageTitle%></title>

<style type="text/css">
<!--
body {
	background-image: url();
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
	background-color: #a09887;
}

-->
</style>
<style type="text/css">
<!--
.STYLE1 {color: #000000}
.STYLE2 {color: #FFFFFF}
#Layer1 {
	position:absolute;
	left:70px;
	top:128px;
	width:85px;
	height:40px;
	z-index:1;
}
#Layer2 {
	position:absolute;
	left:83px;
	top:55px;
	width:360px;
	height:28px;
	z-index:2;
}
-->
</style>
<style> 
BODY {
	scrollbar-face-color:#DDDDDD;
	scrollbar-highlight-color: #f2f2f2;
	scrollbar-shadow-color: #CCCCCC;
	scrollbar-3dlight-color: #F5F5F5;
	scrollbar-darkshadow-color: #F5F5F5;
	scrollbar-track-color: #F0F0F0;
	scrollbar-arrow-color: #FFFFFF;
	background-color: #F2F2F2;	
}
</style>
<link href="new/css.CSS" rel="stylesheet" type="text/css" />
<script language="JavaScript" type="text/JavaScript">
<!--


function MM_jumpMenu(targ,selObj,restore){ //v3.0
  eval(targ+".location='"+selObj.options[selObj.selectedIndex].value+"'");
  if (restore) selObj.selectedIndex=0;
}
//-->
</script>
</HEAD>
</head>

<body >
<table width="175" border="0" cellpadding="0" cellspacing="0" bgcolor="#f2f2f2">
  <tr>
    <td align="center"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td height="9"></td>
      </tr>
    </table>
      <table width="161" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td width="12" height="29" align="left" background="user/infobg.gif"><img src="user/info1.gif" width="12" height="29"></td>
          <td background="user/infobg.gif"><table width="100%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="16"><img src="user/gold.gif" width="12" height="13"></td>
              <td><%=rs(db_User_UserPoint)%> </td>
              <td width="20"><table width="100%" height="3" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                    <td></td>
                  </tr>
                </table>
                  <%if rs(db_User_love)=0 then%>
				<img src=love/1.gif>  
                <%else%>
                <img src=love/<%=rs(db_User_love)%>.gif>
                <%end if%>              </td>
              <td width="45"><table width="100%" height="2" border="0" align="center" cellpadding="0" cellspacing="0">
                  <tr>
                    <td></td>
                  </tr>
                </table>
				
                  <%if rs(db_User_love)=0 then%>
                无语...
                <%else%>
				<%end if%>
                  <%if rs(db_User_love)=1 then%>
                无语...
                <%else%>
                <%end if%>
                  <%if rs(db_User_love)=2 then%>
                高兴...
                <%else%>
                <%end if%>
                  <%if rs(db_User_love)=3 then%>
                郁闷...
                <%else%>
                <%end if%>
                  <%if rs(db_User_love)=4 then%>
                忙碌...
                <%else%>
                <%end if%>
                  <%if rs(db_User_love)=5 then%>
                疑问...
                <%else%>
                <%end if%>
                  <%if rs(db_User_love)=6 then%>
                思念...
                <%else%>
                <%end if%></td>
            </tr>
          </table></td>
          <td width="10" align="right" background="user/infobg.gif"><img src="user/info2.gif" width="10" height="29"></td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <table border="0" align="center" cellpadding="0" cellspacing="0" width="150" height="120">
        <tr>
          <td style="{background-image: URL(<%if rs(db_User_userphoto)<>"" then%><%= rs(db_User_userphoto)%><%else%>images/NoPic2.jpg<%end if%>);
background-position: center; 
background-repeat: no-repeat; 
background-attachment: fixed;}" ></td>
        </tr>
      </table>
      <table width="100%" height="12" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"><strong><img src="user/head.gif" width="10" height="8"><%= UserName %></strong>&nbsp;
              <%
			if rs(db_User_Sex)=1 then
				response.write " <img src=isky/boy.gif border=0 alt=男> "
			else
				response.write " <img src=isky/girl.gif border=0 alt=女> "
			end if
		  %>
            &nbsp;[ <a href="zone.asp?city=<%=rs(db_User_city)%>" target="_blank"><%=rs(db_User_city)%></a>&nbsp;]</td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0" background="user/line1.gif">
        <tr>
          <td height="1"></td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"><iframe frameborder=0 src="info.asp?userid=<%=userid%>" width="153" height="50" marginwidth="0" marginheight="0"  scrolling="yes" name=cc id=aa></iframe></td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="8"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0" background="user/line1.gif">
        <tr>
          <td height="1"></td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="10"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"><strong><img src="user/head.gif" width="10" height="8"></strong>注册日期: <font style='FONT-SIZE: 12px' color='#666666'><%=FormatDateTime(rs(db_User_RegDate),2)%></font></td>
        </tr>
      </table>
      <table width="100%" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <table width="153" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"><strong><img src="user/head.gif" width="10" height="8"></strong>日志: 
            <%
set rsa=server.createobject("adodb.recordset")
sql="select * from [article] where editor='"&username&"' order by articleid desc"
rsa.open sql,Conn,1,1
%>
            <%=rsa.recordcount%></td>
          <td><strong><img src="user/head2.gif" width="10" height="8"></strong>相册:
            <%
set rsp=server.createobject("adodb.recordset")
sql="select * from [photo] where editor='"&username&"' order by photoid desc"
rsp.open sql,Conn,1,1
%>
          <%=rsp.recordcount%></td>
        </tr>
      </table>
      <table width="100%" height="15" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td height="6"></td>
        </tr>
      </table>
      <%
set rsd=server.createobject("adodb.recordset")
sql="select * from [friend] where username='"&username&"' order by id desc"
rsd.open sql,Conn_User,1,1
%>
      <form name="formd">
        <select name="menu1" class="put" LANGUAGE=javascript onChange="window.open(this.value,'_blank','');">
          <option  selected> ---- 查看好友的空间 ---- </option>
          <%do while not rsd.eof%>
          <%
				useridf=rsd("fid")
set rst=server.createobject("adodb.recordset")
sql="select * from [user] where userid="&useridf&" order by userid desc"
rst.open sql,Conn_User,1,3%><%if rst.eof then%><%else%>
          <option value="user.asp?userid=<%=rsd("fid")%>&mdid=indexd&htm=indexs.asp?userid=<%=rsd("fid")%>">&raquo;
            <%if rst("title")<>"" then%>
            <%=left (rst("title"),9)%>...
            <%else%>
            <%=rst("username")%>的空间
            <%end if%>
          </option>
		  <%end if%>         <%rsd.movenext
		loop%>
        </select>
            </form>
    
      </td>
  </tr>
</table>
</body>
</html>
<%

end if

rs.close
set rs=nothing
call CloseConn()
%>