<!--#include file="main.asp" -->
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>圈网_经商网</title>
<link href="css/global.css" rel="stylesheet" type="text/css">
<link href="css/index.css" rel="stylesheet" type="text/css">
</head>
<body background="images/bj.gif">
<!--#include file="top.asp" -->
<table class="border2" cellspacing="0" cellpadding="0" width="780" align="center" 
bgcolor="white" border="0">
  <tbody>
    
    <tr align="left" height="40">
      <td width="2%"></td>
      <td width="96%" colspan="3"><table cellspacing="0" cellpadding="0" width="100%" border="0">
        <tbody>
          <tr>
            <td height="5"></td>
          </tr>
          <tr>
            <td bgcolor="#a6d688" colspan="3" height="1"></td>
          </tr>
          <tr align="left" height="20">
            <td width="1" bgcolor="#a6d688"></td>
            <td bgcolor="#e6e6e6">&nbsp;<%sql="select * from T_club where F_id="&request("club")
set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1                     
if rs.eof and rs.bof then                     
	response.write "<tr><td height=194 colspan=5 align=center>暂无内容</td></tr>"
else
F_co=trim(rs("F_co"))
set rs1=server.createobject("adodb.recordset")
sql1="select * from T_ypxxone where xxone_id="&rs("F_ypxxone")
rs1.open sql1,conn,1,1
xxone_id=rs1("xxone_id")
xxone=rs1("xxone")
rs1.close
%>&nbsp;导航：&nbsp;<a class="blue3ln" 
            href="index.asp">网站首页</a>&gt;&gt;<a 
class="no_underline" href="group.asp?id=<%=xxone_id%>"><%=xxone%></a>&gt;&gt;<b><a 
class="no_underline" 
href="club.asp?id=<%=rs("F_id")%>"><%=rs("F_name")%></a></b> &nbsp;&nbsp;&nbsp; </td>
            <td width="1" bgcolor="#a6d688"></td>
          </tr>
          <tr>
            <td bgcolor="#a6d688" colspan="3" height="1"></td>
          </tr>
          <tr>
            <td height="5"></td>
          </tr>
        </tbody>
      </table></td>
      <td width="2%"></td>
    </tr>
  </tbody>
</table>
<table width="780" 
border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="white" class="border2">
  <tbody>
    <tr>
      <td height="10"></td>
    </tr>
    
     <TR>
    <TD width="2%"></TD>
    <TD class=con1 width="32%" bgColor=#e6e6e6 height=25><B><FONT 
      color=#007700>&nbsp;<a 
class="no_underline" 
href="club.asp?id=<%=rs("F_id")%>"><%=rs("F_name")%></a>活动列表</FONT></B></TD>
    <TD align=right bgColor=#e6e6e6 colSpan=5 height=25><A 
      class=green3ln href=""></A>    <%end if 
				  rs.close%></TD>
    <TD width="2%"></TD>
     </TR>
  <TR>
    <TD width="2%"></TD>
    <TD bgColor=#a6d688 colSpan=6 height=2></TD>
    <TD width="2%"></TD>
  </TR>
  <TR>
<%sql="select * from huodong where club="&request("club")&" order by id desc"
set rs=server.createobject("adodb.recordset")                     
rs.open sql,conn,1,1                     
if rs.eof and rs.bof then                     
	response.write "<tr><td height=194 colspan=5 align=center>暂无内容</td></tr>"
else  
'分页的实现 
listnum=20
Rs.pagesize=listnum
page=Request("page")
if (page-Rs.pagecount) > 0 then
page=Rs.pagecount
elseif page = "" or page < 1 then
page = 1
end if
Rs.absolutepage=page
'编号的实现
j=rs.recordcount
j=j-(page-1)*listnum%>
<%i=0
nn=request("page")
if nn="" then
n=0
else
nn=nn-1
n=listnum*nn
end if
do while not rs.eof and i<listnum
set rs1=server.createobject("adodb.recordset")
sql1="select * from T_member where F_id="&rs("user_id")
rs1.open sql1,conn,1,1
realname=rs1("F_realName")
username=rs1("F_username")
rs1.close
n=n+1%>
    <tr>
      <td width="2%"></td>
      <td colspan="6" height="2"><table width="100%" border="0" cellpadding="0" cellspacing="0" bgcolor="<%if n mod 2=0 then%>#e6e6e6<%else%>#ffffff<%end if%>">
        <tbody>
          <tr>
            <td colspan="6">&nbsp;<b><%=rs("date")%></b> &nbsp;&nbsp;<%=rs("addone")%>-<%=rs("addtwo")%>&nbsp;&nbsp;&nbsp;<a class="orange3" href="activitx_view.asp?id=<%=rs("id")%>"><%=rs("title")%></a></td>
          </tr>
          <tr>
            <td width="29%">&nbsp;<a class="blue3" 
            href=""><%=realname%></a>(<%=username%>)&nbsp;发起</td>
            <td width="22%"><%=rs("zhuti")%></td>
            <td width="4%"></td>
            <td width="15%"><a class="blue3ln" href="activitx_view.asp?id=<%=rs("id")%>">发起留言</a> </td>
            <td width="15%">&nbsp;<a class="blue3ln" href="activitx_view.asp?id=<%=rs("id")%>"><%set rst=server.createobject("adodb.recordset")
rst.open "select * from message_club where key1=5 and l_id="&rs("id")&"",conn,1,1
culb=rst.recordcount
%>
 <b><%=rst.recordcount%></b>
<%rst.close%>条留言</a></td>
            <td width="15%">&nbsp;<a class="blue3ln" 
            href="activitx_view.asp?id=<%=rs("id")%>">详情</a></td>
          </tr>
        </tbody>
      </table></td>
      <td width="2%"></td>
    </tr>
    <tr>
      <td width="2%"></td>
      <td bgcolor="#e5e5e5" colspan="6" height="1"></td>
      <td width="2%"></td>
    </tr><tr>
<%
rs.movenext
i=i+1 
j=j-1
loop%>
<%filename="new_activtx.asp?club="&request("club")&""%>
<td colspan=5 align=right height=20><span class="STYLE2">共 <%=Rs.pagecount%> 页 
      <% if page=1 then %>
      <%else%>
      <a href=<%=filename%>>|<<</a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>><<</a>&nbsp; 
      <a href=<%=filename%>&page=<%=page-1%>>[<%=page-1%>]</a>&nbsp;
      <%end if%>
      <% if Rs.pagecount=1 then %>
      <%else%>
      [<%=page%>]
      <%end if%>
	  <% if Rs.pagecount-page <> 0 then %>
      <a href=<%=filename%>&page=<%=page+1%>>[<%=page+1%>]</a>&nbsp; 
      <a href=<%=filename%>&page=<%=page+1%>>>></a>&nbsp; 
      <a href=<%=filename%>&page=<%=Rs.pagecount%>>>>|</a>&nbsp; 
	  <%end if %>
    &nbsp;</span>&nbsp;</td>
<%end if%></tr>
  </tbody>
</table>
<table width="780" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
   <td height="23" colspan="2" align="center">
<DIV id=sub_nav>
<%set rs=server.createobject("adodb.recordset")
sql="select * from T_ypxxone"
rs.open sql,conn,1,1
n=0
do while not rs.eof
n=n+1%><A href="group.asp?id=<%=rs("xxone_id")%>"><%=rs("xxone")%></A> | <%
rs.movenext
loop
rs.close%></DIV></td>
  </tr>
</table>
<!--#include file="bottom.asp" -->
</body>
</html>
