<!--#include file="inc/conn.asp"-->
<!--#include file="inc/function.asp"-->
<!--#include file="inc/Conn_User.asp"-->
	<script type=text/javascript>var xijuan={channel:"video"}</script>
	<script type=text/javascript src="Inc/main.js"></script>

<body oncontextmenu="return false" ondragstart="return false" onselectstart="return false">
<%
'请勿改动下面这三行代码
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 &"家园"
	

%>
<body style="overflow-y:hidden"> 
										<div id="div_authorPhoto" class="info_l">&nbsp;<A class=usr href="user.asp?userid=<%= UserID %>" target=_blank> <img src="<%if rs(db_User_userphoto)<>"" then%><%= rs(db_User_userphoto)%><%else%>images/NoPic2.jpg<%end if%>" width="80" height="80">
 </A> </div>										
										<div class="info_r">
											<ul>
												<li><div id="p_authorNickName">作者：<a href="user.asp?userid=<%=UserID%>"target=_blank> <%= UserName %></a>&nbsp;&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
		  %></div></li><li></li>
												<li><div id="p_authorLevel">地区：&nbsp;&nbsp;<a href="zone.asp?city=<%=rs(db_User_city)%>" target="_blank"><%=rs(db_User_city)%></a>&nbsp;&nbsp;  &nbsp;&nbsp;心情：               



                <%if rs(db_User_love)=0 then%>
				<img src=love/1.gif>  
                <%else%>
                <img src=love/<%=rs(db_User_love)%>.gif>
                <%end if%> 

 <%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%></div></li>
						<li></li>					
												<li><img src="images/icon_arrow.png" width="7" height="6" />
											<a href="fsave.asp?fid=<%= UserID %> "target=_blank>
												加为好友
											</a>
									
											<img src="images/icon_arrow.png" width="7" height="6" />
											<a href="gbooks.asp?userid=<%= UserID %>"target=_blank>
												给我留言
											</a>
										
											<img src="images/icon_arrow.png" width="7" height="6" />
											<a href="messager.asp?action=new&touser=<%= UserName %>"target=_blank>
												发短信息

											</a>
									


		


<%

end if

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