<!--#include file="../Include/Conn.jsp" -->
<!--#include file="../Include/const.jsp" -->
<!--#include file="../Include/char.jsp" -->
<!--#include file="../include/function.jsp"-->
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3c.org/TR/1999/REC-html401-19991224/loose.dtd">
<HTML xmlns="http://www.w3.org/1999/xhtml"><HEAD><TITLE>运城地带 - 精彩活动</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
media=all href="css/ploy.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1555" name=GENERATOR></HEAD>
<BODY>
<DIV id=logo>
<H1>运城地带-精彩活动</H1><!--nav start-->
	<DIV id=nav><A href="../">首页</A> | <A 
href="QQ_default.jsp">运城地带</A> | <A 
href="QQ_index.jsp">小圈子</A> | <A 
href="../blog/">运城博客</A> | <A 
href="photo_default.jsp">网络相册</A> | <A 
href="QQ_ployall.jsp">精彩活动</A> | <A 
href="friend_index.jsp">交友频道</A> | <A 
href="../bbs/" target=_blank>运城社区</A> </DIV><!--nav end--></DIV>
<DIV id=main><!--contain start-->
<DIV id=contain><IMG class=corner src="img/ploy/corner_left.gif"> <!--ploy start-->
<H6><A href="QQ_default.jsp">运城地带</A> - 活动</H6>
<%
					dim PerPage
					set rs_c=server.createobject("adodb.recordset")
					sql_c="select * from t_club_meet as A inner join T_meetclass as B on A.f_meetclass=B.meetclassid "
					if m_keyword<>"" then
					sql_c=sql_c&" and A.f_title like  '%"&m_keyword&"%'"
					end if
					if m_area<>"" then
					sql_c=sql_c&" and A.f_area='"&m_area&"'"
					end if
					sql_c=sql_c&" order by A.f_time desc"
					rs_c.open sql_c,conn,1,1
					'flag="尚未处理"
                    PerPage=20
				
                   '假如没有数据时
                 ' If rs_c.eof and rs_c.bof then
                  ' response.write "<p align='center'><font color='#ff0000'>还没任何新闻</font></p>"
                 ' response.end
                 ' End if
					'取得页数,并判断用户输入的是否数字类型的数据，如不是将以第一页显示
                    text="0123456789"
                    Rs_c.PageSize=PerPage
					
                    for i=1 to len(request("page"))
                    checkpage=instr(1,text,mid(request("page"),i,1))
                    if checkpage=0 then
                    exit for
                    end if
                    next

                  If checkpage<>0 then
                  If NOT IsEmpty(request("page")) Then
                  CurrentPage=Cint(request("page"))
                  If CurrentPage < 1 Then CurrentPage = 1
                  If CurrentPage > Rs_c.PageCount Then CurrentPage = Rs_c.PageCount
                  Else
                  CurrentPage= 1
                  End If
                 If not Rs_c.eof Then Rs_c.AbsolutePage = CurrentPage end if
                 Else
                 CurrentPage=1
                 End if					
				%>
<DL>
  <H5>活动列表 
  </H5>
  <DT>
  <P class=dd1>活动</P>
  <P class=dd2>性质</P>
  <P class=dd3>地区</P>
  <P class=dd5>活动时间</P>
  <P class=dd6>操作</P></DT>
    <%
if not rs_c.eof then
i=0
do while not rs_c.eof
%> <DD>
  <P class=dd1><A title="<%=rs_c("f_title")%>" href="club_lookmeet.jsp?id=<%=rs_c("f_club_id")%>&meetid=<%=rs_c("f_id")%>"><U><%=rs_c("f_title")%></U></A> <%if rs_c("f_endtime")< now() then%><font class=red>(已过期)</font><%end if%><BR><A class=red 
  href="club_member.jsp?username=<%=rs_c("f_username")%>" 
  target=_blank><%=rs_c("f_username")%></A> 发起 </P>
  <P class=dd2><%=rs_c("meetclass")%> </P>
  <P class=dd3><%=rs_c("f_area")%> </P>
  <P class=dd5><%=rs_c("f_time")%></P>
  <P class=dd6><A class=green onClick="return confirm('您确定要报名参加这个活动吗？')" 
  href="club_joinmeet.jsp?id=<%=rs_c("f_id")%>&meetid=<%=rs_c("f_id")%>&type=join">报名参加</A></P></DD>
            <%
i=i+1
if i >= Perpage then exit do
rs_c.movenext
loop
end if
%>
  </DL><!--ploy end-->
<DIV id=page> <% If currentpage > 1 Then  %>
              &nbsp;<a href='QQ_ployall.jsp?page=<%=cstr(1)%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">9</SPAN></a> 
              &nbsp;<a href='QQ_ployall.jsp?page=<%=Cstr(currentpage-1)%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">7</SPAN></a> 
              &nbsp; 
              <% Else  %>
              &nbsp;<SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">9</SPAN> 
              &nbsp;<SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">7</SPAN> 
              <% end if %>
              <%
			  if rs_c.pagecount>8 then
			  n_star=currentpage
			  n_end=currentpage+7
			  else
			  n_star=1
			  n_end=rs_c.pagecount			  
			  end if
			  %>
              <% FOR n=n_star to n_end %>
              <% if n>rs_c.pagecount then  exit for  end if%>
              &nbsp;<a href='QQ_ployall.jsp?page=<%=n%>'><FONT color=#ff0000><B><%=n%></B></FONT></a> 
              <%
			  next
			 %>
              <% If currentpage < Rs_c.PageCount Then %>
              &nbsp;<a href='QQ_ployall.jsp?page=<%=Cstr(currentPage+1)%>'><SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">8</SPAN></a> 
              &nbsp;<a href='QQ_ployall.jsp?page=<%=Cstr(Rs_c.PageCount)%>'><SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">:</SPAN></a> 
              <% else %>
              &nbsp;<SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">8</SPAN> 
              &nbsp;<SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">:</SPAN> 
              <% end if %> </DIV>
<DIV id=foot><A class=list href="../about/?Para=Intro" target=_blank>关于我们</A> ┊ <A class=list href="../about/?Para=Contact" target=_blank>联系方式</A> ┊ <A class=list href="../about/?Para=Job" target=_blank>招贤纳士</A> ┊ <A class=list href="../about/?Para=AdService" target=_blank>广告服务</A> ┊ <A class=list href="../about/?Para=Cooperate" target=_blank>合作伙伴</A> ┊ <A class=list href="../so/Suggestion.jsp" target=_blank> 留言/投诉</A> ┊ <A class=list href="../about/?Para=Job" target=_blank></A><BR><%=Site_info(5)%> </DIV></DIV><!--contain end--><!--leftnav start-->
<DIV id=leftnav>
<H2><A href="QQ_ployall.jsp"><FONT 
color=#ffffff>精彩活动</FONT></A></H2>
<%
	  set rs_c=server.createobject("adodb.recordset")
	  sql_c="select * from T_meetclass order by meetclassid asc"
	  rs_c.open sql_c,conn
	  do while not rs_c.eof	
	  %> 
<H3><A href="QQ_ploy.jsp?meetclassid=<%=rs_c("meetclassid")%>"><%=rs_c("meetclass")%></A></H3>
  <%rs_c.movenext
	  loop
		rs_c.close
		set rs_c=nothing
		%>
</DIV><!--leftnav end--></DIV>
<SCRIPT language=javascript>
if(document.getElementById("contain").scrollHeight>document.getElementById("leftnav").scrollHeight)
{document.getElementById("leftnav").style.height=document.getElementById("contain").scrollHeight+"px";}
</SCRIPT>
</BODY></HTML>
