<!-- #include file="top.asp" -->
<!-- #include file="share.asp" -->
<!-- #include file="online.asp" -->
<% 
dim page
dim pagesize
dim pagenum

pagesize=14
page=request("page")
if page="" then
page=1
else
page=cint(page)
end if
%>
<html>
<head>
<title>3鸟设社[色彩连视版]媒体社区成员列表</title>
<meta http-equiv="content-type" content="text/html; charset=gb2312">
<link rel="stylesheet" href="blue.css" type="text/css">
<style type="text/css">
<!--
.hand { cursor: hand }
-->
</style>
</head>
<body bgcolor=#ffffff leftmargin="0" topmargin="0">
<table width="757" height="608" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr bgcolor="#FFFFFF"> 
    <td width="20" height="10"></td>
      
    <td width="719" height="10"></td>
      
    <td width="21" height="10"></td>
    </tr>
    <tr>
        
    <td width="25" height="427" background="images/bg.gif"></td>
        
    <td width="719" height="427" valign="top"> 
      <table width="716" height="481" border="0" cellspacing="0">
        <tr> 
          <td width="714"> <table width="100%" cellpadding="0" cellspacing="0" border="0">
              <tr> 
                <td align="left"><div align="center"><img src="images/rightstyle.gif"><a href="index.asp">返回首页</a> 
                    <img src="images/rightstyle.gif"><a href="userlist.asp">查看成员列表</a> 
                    <%
			if session("blueuid")=request("uid") then
		%>
                    <img src="images/rightstyle.gif"><a href="editinfo.asp?uid=<%=request("uid")%>">修改个人资料 
                    </a> 
                    <%
			end if
		%>
                    <img src="images/rightstyle.gif"><a href="javascript:history.back();">返回 
                    </a> </div></td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td height="340"> 
            <table width="100%" border="0" cellspacing="0" cellpadding="0">
              <tr> 
                <td height="338" align="left" valign="top"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0" height="73">
                    <tr align="left" valign="top"> 
                      <td width="100%" align="right"> <table width="100%" border="0" cellspacing="0" cellpadding="0">
                          <tr> 
                            <td width="45"><img src="images/frame_forum2.gif" align="absmiddle"></td>
                            <td align="left" height="20" valign="middle" background="images/frame_bg.gif"><font class="subtitle">论坛成员列表</font></td>
                          </tr>
                        </table>
                        <%
				  dim rs
				  dim sql
				  sql="select * from userinfo where authority>=0 and not uid='admin' order by regtime desc"
				  'opendb
				  set rs=server.createobject("adodb.recordset")
				  rs.open sql,conn, 1,3
				  if not rs.eof then
				%>
                        <%

rs.pagesize=pagesize
if page<=rs.pagecount then
rs.absolutepage=page
else page=rs.pagecount
end if
pagenum=rs.pagecount
if page>1 then
%>
                        <a href="userlist.asp?page=<%=page-1%>"><img src="images/page_prev.gif" border="0"></a>&nbsp; 
                        <% else %>
                        <img src="images/page_prev.gif" border="0">&nbsp; 
                        <%
end if
for i=1 to pagenum
if i<>page then
%>
                        <a href="userlist.asp?page=<%=i%>"><%=i%></a>&nbsp; 
                        <% else %>
                        <%=i%>&nbsp; 
                        <%
end if
if i>=pagenum then exit for
next
if page<pagenum then
%>
                        &nbsp;<a href="userlist.asp?page=<%=page+1%>"><img src="images/page_next.gif" border="0"></a> 
                        <% else %>
                        &nbsp;<img src="images/page_next.gif" border="0"> 
                        <%
end if
'-------------------------------------page navigator--------------end 
%>
                        <%
				  for i=1 to pagesize
				  pos=rs("pos")
				  uid=rs("uid")
				  regtime=rs("regtime")
				  email=rs("email")
				  homepage=rs("homepage")
				  sn=rs("sn")
				  authority=rs("authority")
				  if homepage="" then
					' no action is required.
				  elseif not instr(lcase(homepage),"http://")=1 then
					homepage="http://"&homepage
				  end if
				  %>
                        <table width="100%" border="0" cellspacing="0" cellpadding="0" name="uses" class="repeatx_top" background="images/frame_bg_h.gif">
                          <tr align="left" valign="middle"> 
                            <td width="35" align="center"> 
                              <%
					  if pos>=0 and pos<10 then
					  %>
                              <img src="images/bbs_head1.gif" width="20" height="20" align="absmiddle" alt="石头 [<%=sn%>/<%=pos%>/<%=10-pos%>]"> 
                              <%
					  elseif pos>=10 and pos<50 then
					  %>
                              <img src="images/bbs_head2.gif" width="20" height="20" align="absmiddle" alt="玻璃 [<%=sn%>/<%=pos%>/<%=50-pos%>]"> 
                              <%
					  elseif pos>=50 and pos<200 then
					  %>
                              <img src="images/bbs_head3.gif" width="20" height="20" align="absmiddle" alt="水晶 [<%=sn%>/<%=pos%>/<%=200-pos%>]"> 
                              <%
					  else
					  %>
                              <img src="images/bbs_head4.gif" width="20" height="20" align="absmiddle" alt="金刚石 [<%=sn%>/<%=pos%>/∞]"> 
                              <% end if %>
                            </td>
                            <td width="292"><a href="showuser.asp?uid=<%=uid%>"> 
                              <%
						if authority>=1 then
							response.write "<b>"&uid&"</b>"
						else
							response.write uid
						end if
					  %>
                              </a></td>
                            <td width="292"><%=regtime%></td>
                            <td align="left" width="90">&nbsp;<a href="mailto:<%=email%>"><img src="images/email.gif" border="0" align="absmiddle" alt="<%=email%>" width="19" height="19"></a> 
                              <%
					  if not homepage="" then
					  %>
                              &nbsp;<a href="<%=homepage%>" target="_blank"><img src="images/home.gif" border="0" align="absmiddle" alt="<%=homepage%>" width="19" height="19"></a> 
                              <%
					  else
					  %>
                              <%
					  end if
					  %>
                            </td>
                          </tr>
                        </table>
                        <%
				  rs.movenext
				  if rs.eof then exit for
				  next
				  else 'if rs.eof then
					response.write "当前没有注册成员。"
				  end if
				  rs.close
				  set rs=nothing
				  'closedb
				  %>
                        <table border="0" cellpadding="0" cellspacing="0" width="100%" align="center">
                          <tr> 
                            <td height="1" bgcolor="#888888"></td>
                          </tr>
                          <tr> 
                            <td> </td>
                          </tr>
                        </table></td>
                    </tr>
                  </table>
                  <iframe border="0" frameborder="0" width="1" height="1" name="onlineframe" id="onlineframe" src="keep.asp?act=查看论坛用户列表" scrolling="false"></iframe> 
                </td>
              </tr>
            </table></td>
        </tr>
        <tr> 
          <td height="50"><div align="center"></div></td>
        </tr>
      </table>
      <div align="center"><font color="#330000"><br>
        <br>
        <br>
        <a href="#top">[UP]</a></font> </div></td>
        
    <td width="25" height="427" background="images/bg.gif"></td>
    </tr>
    <tr>
      <td height="12" colspan="3"><div align="center">
        <table width="760" border="0" align="center" cellspacing="0">
          <tr> 
            <td height="35" colspan="2" background="images/footbg.gif"> <div align="center">3鸟设社[v1.2色彩连视]T恤论论坛 
                www.3niao.com</div></td>
          </tr>
          <tr> 
            <td width="392" background="http://www.3niao.com/v2/down1/images/footgb1.gif">&nbsp;</td>
            <td width="362"><div align="right"><img src="http://www.3niao.com/v2/down1/images/foot.jpg"></div></td>
          </tr>
        </table>
      </div></td>
    </tr>
  </table>
  </center>
</div>

</body>

</html>
