<TABLE WIDTH=100% BORDER=0 CELLSPACING=0 CELLPADDING=0>
	<TR>
		<TD WIDTH=100% background=../images/back1.gif>

<table cellSpacing="0" cellPadding="0" width="100%" align="center"   border="0" >
  <tbody >
  <tr bgcolor=#ffffff  height=2 >
    <td colSpan="3"></td></tr>  
  <%set rs_t=server.CreateObject ("ADODB.recordset")
  
   sql="select * from user where user_name='"&session("Current_user")&"'"
   rs_t.Open sql,conn1,3,2
  if rs_t.RecordCount<>0 then
   nickname=rs_t("nickname")
   
   if rs_t("weight")=1 then
	 user_type="普通会员"
	else
		 user_type="VIP会员"
	end if 
end if	
	set rs_online=server.CreateObject ("ADODB.recordset")
  
   sql="select count(*) as online_num from online"
   rs_online.Open sql,conn1,3,2
   
   online_num=rs_online("online_num")
  
  %>
  <tr height=20 style=" COLOR: #d20069;
    FONT-FAMILY: &Euml;&Icirc;&Igrave;&aring;;
    FONT-SIZE: 12px">
    <td ><font size="2"><a href="../default.asp">&nbsp;首页</font></a> --&gt;
    <font size="2">我的小屋</font></td>
    <td  align=center><font style="FONT-SIZE: 12px">在线会员</font><font color="#ffffff">:</font><%=online_num%>人 你好，<%=nickname%>！　类别：<%=user_type%>  </td>
    </tr>
  
    </tbody></table>
</TD>
	</TR>
</TABLE>