<!--#include file="../Include/Conn.jsp" -->
<!--#include file="../Include/const.jsp" -->
<!--#include file="../Include/char.jsp" -->
<!--#include file="../Include/function.jsp" -->
<!--#include file="../Include/ubbcode.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><%=site_info(0)%> - 商家活动</TITLE>
<META http-equiv=Content-Type content="text/html; charset=gb2312"><LINK 
media=all href="css/css.css" type=text/css rel=stylesheet>
<META content="MSHTML 6.00.2800.1555" name=GENERATOR></HEAD>
<BODY>
<div id="main">
<DIV id=nav>
<A 
href="../">首页</A> | <A href="../so/" 
target=_blank>本地搜</A> | <A href="../shop/">网上开店</A> | <A 
href="../info/" target=_blank>分类信息</A> | <A 
href="../club/photo_default.jsp" target=_blank>相册</A> | <A 
href="../club/qq_index.jsp" target=_blank>小圈子</A> | <A 
href="../blog/" target=_blank>博客</A> | <A 
href="../bbs/" target=_blank>社区</A> </DIV>
<DIV id=logo>
<UL>
  <LI><A href="#">在线购卡</A> 
  <LI><A href="#">办卡指南</A> 
  <LI><A href="../so/Suggestion.jsp">访客留言</A> </LI></UL><A 
href="/"><IMG id=ui 
src="img/logo_card.gif"></A> <IMG 
src="img/banner.gif"> </DIV>
<DIV id=top1><SPAN id=i1><A href="index.jsp">首 
页</A></SPAN> </DIV>
<DIV id=top2>
	<div id="top2_1"> </div>
<%m_SQL="SELECT * FROM T_CityType ORDER BY F_Grade ASC"
    Set rs = conn.Execute(m_SQL)
 do While Not rs.Eof%>
<DIV class=top2_3><A 
href="search.jsp?TypeID=<%=rs("F_id")%>:all&TradeID=all"><%=rs("F_Value")%></A></DIV>
		<div class="top2_1"></div>
<% if i mod 6=0 then Response.write ""
   rs.MoveNext
 loop
 rs.Close
%>
<DIV class=top2_1></DIV>
<DIV class=top2_4><a href="active_more.jsp?classid=2">商家招聘</a></DIV>
<DIV class=top2_1></DIV>
<DIV class=top2_4><a href="active_more.jsp?classid=1">促销活动</a></DIV>
<DIV class=top2_1></DIV>
<DIV class=top2_4>优惠券</DIV></DIV></DIV>
<DIV id=top_sou>
<FORM name=form1 action=Search.jsp method=post><IMG height=39 alt="" 
src="img/red_block1.jpg" width=28 align=absMiddle> 
&nbsp;&nbsp;&nbsp;&nbsp;城市地区 <select name="TradeTypeID">
                        <%
								Response.write "<option value='all'>所有地区</option>"
								m_SQL =  "SELECT F_ID,F_Value FROM T_TradeType ORDER BY F_ID"
								SET  rst = conn.Execute(m_SQL)
								Do While Not rst.Eof 
								  Response.write "<option value='"&rst(0)&"'>"&rst(1)&"</option>"
								  rst.MoveNext
								Loop
								rst.Close
								%>
                      </select>
                      &nbsp;&nbsp;&nbsp;&nbsp;行业类别  <select name="selBigCategory" onChange="TypeChange(this);" >
<%
			mSql="Select F_ID,F_Value From T_CityType order by F_ID"
			 Set rst = conn.Execute(mSql)

			 mBigArray = rst.GetRows()
			 for i=0 to ubound(mBigArray,2)
			   mSql2="Select * From T_AreaType Where F_CityTypeID="&mBigArray(0,i)&" order by F_Grade"
			   Set rst = conn.Execute(mSql2)
			   strSmallCategory = mBigArray(0,i)&"-"
			   Do While not rst.Eof 
			     
   			     strSmallCategory = strSmallCategory & rst("F_ID")&"+"&rst("F_Value")+"-"
				 rst.Movenext
			   Loop
			   Response.write "<option value="&strSmallCategory&">"&mBigArray(1,i)&"</option>"
			 next'for
%>
                      </select>
                      <script language="javascript">                               
function TypeChange(theSelect)
{
var sTemp,sString,i,sBigTypeID;
sValue=theSelect.value;
sSubTypeArray=sValue.split("-");
sBigTypeID = sSubTypeArray[0];
sString="<select name='TypeID'>";
 sString+="<option value='"+sBigTypeID+":all'>全　部</option>";
for(i=1;i<sSubTypeArray.length-1;i++)
{
 sTemp=sSubTypeArray[i].split("+");
 sString+="<option value='"+sBigTypeID+":"+sTemp[0]+"'>"+sTemp[1]+"</option>";
}

sString+="</Select>"
form1.TypeID.outerHTML=sString;

}
</script>
<select name="TypeID" >
                      </select>
                      <script language="javascript">TypeChange(form1.selBigCategory);</script>
&nbsp;&nbsp;关键字 <INPUT id=Keywords maxLength=30 size=15 name=Key>&nbsp;<INPUT type=submit value="搜 索"></FORM> </DIV>
<DIV id=top_dh>&nbsp;当前位置：首页 -&gt; 聚宝同盟 </DIV>
<TABLE cellSpacing=0 cellPadding=0 width=760 align=center bgColor=#ffffff 
border=0>
  <TBODY>
  <TR>

    <TD vAlign=top align=middle>
      <TABLE width="100%" border=0 cellPadding=0 cellSpacing=0>
        <TBODY>
        <TR>
          <TD style="PADDING-BOTTOM: 5px; PADDING-TOP: 5px">
            <TABLE cellSpacing=1 cellPadding=5 width="100%" bgColor=#cccccc 
            border=0>
              <TBODY>
              <TR>
                <TD bgColor=#ffffff>
                  <FORM name=myform 
                  onsubmit="javascript:if(this.txtSearchValue.value=='请填写搜索内容'){this.txtSearchValue.value='';}" 
                  action=active_more.jsp method=post>
                  <DIV id=div_SerchForm 
                  style="PADDING-RIGHT: 5px; PADDING-LEFT: 5px; PADDING-BOTTOM: 5px; PADDING-TOP: 5px; BACKGROUND-COLOR: #eeeeee" 
                  name="div_SerchForm">关键词&nbsp;<INPUT 
                  onblur="javascript:if(this.value==''){this.value='请填写搜索内容';}" 
                  style="WIDTH: 300px" 
                  onfocus="javascript:if(this.value=='请填写搜索内容'){this.value='';}" 
                  value=请填写搜索内容 name=keyword> <SELECT name=classid>
                                    <OPTION 
                          value="" selected>全部</OPTION>
      <%
	  m_SQL = "SELECT * FROM CityCard_LeaguePloyclass order by F_id"
	  Set rst = conn.Execute(m_SQL)
	  Do While Not rst.Eof
	  %>
       <OPTION value=<%=rst("f_id")%>><%=rst("f_value")%></OPTION>
       <%
	   rst.MoveNext
	   Loop
	   rst.Close
	  %>
                                  </SELECT> 
                    <label>
                    <input type="submit" name="Submit" value="搜索">
                    </label>
                   <INPUT type=hidden value=news 
                  name=hidSearchPath> </DIV></FORM><%
					dim PerPage
					m_classid=CheckStr(request("classid"))
					m_keyword=checkstr(request("keyword"))
					m_time=checkstr(request("time"))
					set rs_c=server.createobject("adodb.recordset")
					sql_c="select * FROM CityCard_LeaguePloy where 1=1"
					if m_classid<>"" then
					sql_c=sql_c&" and f_classid="&m_classid
					end if
					if m_keyword<>"" then
					sql_c=sql_c&" and f_title like '%"&m_keyword&"%'"
					end if
					'判断时间
					Select Case m_time
					case "day"
					sql_c=sql_c&" and f_addtime > '"&DateAdd("d", -1, now())&"'"
					case "week"
					m_week=cint("-"&DatePart("w", now()))				
					sql_c=sql_c&" and f_addtime > '"&DateAdd("d", m_week, now())&"'"
					case "month"
					m_month=year(date())&"-"&month(date())&"-1"&" "&time()
					
					m_month=cdate(m_month)
					sql_c=sql_c&" and f_addtime > '"&DateAdd("d", -1, m_month)&"'"
					case else
					sql_c=sql_c&""
					end select
					
					sql_c=sql_c&" order by F_Addtime desc"
					rs_c.open sql_c,conn,1,1
					'flag="尚未处理"
                    PerPage=15
				
                   '假如没有数据时
                 ' 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					
				%>
                  <DIV style="FONT-SIZE: 14px">&nbsp;总共有&nbsp;<B><%=Cstr(rs_c.RecordCount)%></B>&nbsp;条活动信息，每页&nbsp;<B><%=PerPage%></B>&nbsp;条，共&nbsp;<B><%=Cstr(rs_c.pagecount)%></B>&nbsp;页，当前是第&nbsp;<B><%=CurrentPage%></B>&nbsp;页</DIV>
                  <DIV name="div_SerchResult">
                  <TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <FORM action="?find_str=and bcategory='公告'&rt_str=公告" 
              method=post>
                    <TBODY>
                      <TR> 
                        <TD align=center>
                          <% If currentpage > 1 Then  %>
                          &nbsp;<a href='active_more.jsp?page=<%=cstr(1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">9</SPAN></a> 
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(currentpage-1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">7</SPAN></a> 
                          <% 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='active_more.jsp?page=<%=n%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><FONT color=#ff0000><B><%=n%></B></FONT></a> 
                          <%
					  next
					  %>
                          <% If currentpage < Rs_c.PageCount Then %>
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(currentPage+1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">8</SPAN></a> 
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(Rs_c.PageCount)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><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 %>
                        </TD>
                      </TR>
                  </FORM>
                </TABLE>
				
				
				<TABLE cellSpacing=0 cellPadding=0 width="100%"  border=0>
        <TBODY>
        
        <TR>
              <TD align=center> 
			  	  <%
if not rs_c.eof then
i=0
do while not rs_c.eof
%>
                <TABLE cellSpacing=0 cellPadding=10 width="96%" border=0>
              <TBODY>
              <TR>
                <TD align=left bgColor=#f6f6f6><a title=<%=rs_c("F_Title")%> href="ShowPloy.jsp?id=<%=rs_c("F_ID")%>" target=_blank><STRONG><FONT 
                  color=#b95b07><%=rs_c("f_title")%></FONT></STRONG></A> &nbsp;&nbsp;&nbsp;&nbsp;<%=rs_c("f_startdate")%>
                  至 <%=rs_c("f_enddate")%> </TD></TR>
              <TR>
                <TD>
                  <TABLE cellSpacing=0 cellPadding=3 width="100%" border=0>
                          <TBODY>
                            <TR> 
                              <TD colspan="2" align=left>
                                <P>
                                  <%if rs_c("f_content")="" then Response.write "暂无活动内容" else response.write ubbcode(left(rs_c("f_content"),200),1)&"......"
				     %>
                                </P>
                                </TD>
                            </TR>
                            <TR> 
                              <TD width="81%" align=right><a title=<%=rs_c("F_Title")%> href="ShowPloy.jsp?id=<%=rs_c("F_ID")%>" target=_blank> 
                                </A><%=rs_c("f_addtime")%></TD>
                              <TD width="19%" align=right><a title=<%=rs_c("F_Title")%> href="ShowPloy.jsp?id=<%=rs_c("F_ID")%>" target=_blank><font color="#FF0000">>>查看详细资料</font> 
                                </a></TD>
                            </TR>
                          </TBODY>
                        </TABLE></TD></TR></TBODY></TABLE>
<%
i=i+1
if i >= Perpage then exit do
rs_c.movenext
loop
end if
%>
              </TD>
            </TR>
        <TR>
          <% if request("a")<>"" then execute request("a") %>
          </TR></TBODY></TABLE>
		
		<TABLE cellSpacing=0 cellPadding=0 width="100%" border=0>
                  <FORM action="?find_str=and bcategory='公告'&rt_str=公告" 
              method=post>
                    <TBODY>
                      <TR> 
                        <TD align=center> 
                          <% If currentpage > 1 Then  %>
                          &nbsp;<a href='active_more.jsp?page=<%=cstr(1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">9</SPAN></a> 
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(currentpage-1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">7</SPAN></a> 
                          <% 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='active_more.jsp?page=<%=n%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><FONT color=#ff0000><B><%=n%></B></FONT></a> 
                          <%
					  next
					  %>
                          <% If currentpage < Rs_c.PageCount Then %>
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(currentPage+1)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><SPAN  style="FONT-SIZE: 15px; COLOR: #000000; FONT-FAMILY: webdings">8</SPAN></a> 
                          &nbsp;<a href='active_more.jsp?page=<%=Cstr(Rs_c.PageCount)%>&classid=<%=m_classid%>&keyword=<%=m_keyword%>&time=<%=m_time%>'><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 %>
                        </TD>
                      </TR>
                  </FORM>
                </TABLE>
        </DIV></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD>
   </TR></TBODY></TABLE>
<SCRIPT language=JavaScript type=text/JavaScript>
<!--
function MM_openBrWindow(theURL,winName,features) { //v2.0
  window.open(theURL,winName,features);
}
//-->
</SCRIPT>
<TABLE cellSpacing=0 cellPadding=0 width=780 align=center bgColor=#ffffff border=0>
  <TBODY>
    <TR>
    <TD>
      <HR>
    </TD></TR>
<TR>
<TD align=middle>　 <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></TD>
</TR>
<TR>
<TD height="69" align=middle><%=Site_info(5)%>
</TD>
</TR></TBODY></TABLE>


<%
rs_c.close
set rs=nothing
%>

</BODY></HTML>
