<!--#Include File="inc/Check_Sql.asp"-->
<!--#include file="Inc/conn.asp"-->
<!--#include file="Inc/config.asp" -->
<!--#include file="inc/Function.asp"-->
<!-- #include file="Head.asp" -->
<% 
BigClass=request("BigClass")
SmallClass=request("SmallClass")
%>


<table width="1004" height="39" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="243" ><table width="243" height="39" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td background="imgbyl/ab1.gif" class="bai14px" style="padding-left:28px; padding-top:3px;">新闻中心</td>
      </tr>
    </table></td>
    <td width="8"></td>
    <td width="29" background="imgbyl/ab2.gif" ></td>
    <td width="75" background="imgbyl/abbg.gif" class="red14px" style="padding-top:4px;"><%=bigclass%></td>
    <td width="451" background="imgbyl/abbg.gif" class="ab2" style="padding-top:4px;">News Center </td>
    <td width="198" align="center" background="imgbyl/abbg.gif" class="ab3" style="padding-top:4px;">当前位置：首 页 &gt;&gt; <%=bigclass%> </td>
  </tr>
</table>
<table width="1004" height="221" border="0" align="center" cellpadding="0" cellspacing="0" style="padding-bottom:8px;">
  <tr>
    <td width="243" valign="top"><table width="243" height="79" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td height="79" align="center" valign="top" background="imgbyl/ab3.gif">


<%
Set rslist = Server.CreateObject("ADODB.Recordset")
sql="select BigClassName from BigClass_New order by BigClassID"
rslist.open sql,conn,1,3
do while not rslist.eof
%>

              <table width="222" border="0" cellpadding="0" cellspacing="0" style="margin-top:5px;">
                <tr>
                  <td height="37" align="left" background="imgbyl/ab5.gif" style="padding-left:55px; ">
				  <a href="NewsClass.asp?BigClass=<%=rslist("BigClassName")%>" class="ab11"><%=rslist("BigClassName")%></a>
				  </td>
                </tr>
              </table>
          
<%rslist.movenext 
loop
rslist.close
set rslist=nothing
%>




          </td>
      </tr>
    </table>
        <table width="243" height="13" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td><img src="imgbyl/ab4.gif" width="243" height="14" /></td>
          </tr>
        </table>
      <table width="243" height="39" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td background="imgbyl/ab1.gif" class="bai14px" style="padding-left:28px; padding-top:3px;">在线服务</td>
          </tr>
        </table>
      <table width="243" height="79" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td height="79" align="center" valign="top" background="imgbyl/ab3.gif" tppabs="http://cne7225.chinaw3.com/816/imgbyl/ab3.gif"><table width="201" height="98" border="0" cellpadding="0" cellspacing="0" style="margin-top:5px;">
                <tr>
                  <td height="37" align="left" class="copy1">

<!--#include file="qq.asp" -->


</td>
                </tr>
            </table></td>
          </tr>
        </table>
      <table width="243" height="13" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td><img src="imgbyl/ab4.gif" width="243" height="14" /></td>
          </tr>
      </table></td>
    <td width="8"></td>
    <td width="753" valign="top"><table width="753" height="15" border="0" cellpadding="0" cellspacing="0">
      <tr>
        <td><img src="imgbyl/ab6.gif" width="753" height="15" /></td>
      </tr>
    </table>
        <table width="753" height="153" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td valign="top" background="imgbyl/ab7.gif" class="aboutus" style="padding-left:35px; padding-top:15px; padding-right:35px; padding-bottom:15px;" >
			
<table width="100%" border="0" cellpadding="0" cellspacing="0">













<% 
page=clng(request("page"))		 
Set rs=Server.CreateObject("ADODB.RecordSet") 
if BigClass<>"" and SmallClass <>"" then
sql="select * from news where BigClassName='"&BigClass&"' and SmallClassName='"&SmallClass&"' order by AddDate desc"
rs.Open sql,conn,1,1
elseif BigClass<>"" then
sql="select * from news where BigClassName='"&BigClass&"' order by AddDate desc"
rs.Open sql,conn,1,1
end if
if rs.eof and rs.bof then
  response.Write("暂时没有记录")
else 
%>
                  <% 
rs.PageSize=20
if page=0 then page=1 
pages=rs.pagecount
if page > pages then page=pages
rs.AbsolutePage=page  
for j=1 to rs.PageSize 
%>                   
                    <tr>
                      <td width="6%" height="30" align="center" style="BORDER-bottom: #E7E7E7 1px dashed">
<img src="Img/arrow_6.gif" width="11" height="11" /></td>
                      <td width="65%" height="24" style="BORDER-bottom: #E7E7E7 1px dashed">
                          <a href="shownews.asp?id=<%= RS("id") %>" target="_blank" class="black"><%= RS("TITLE") %></a>　</td>
                      <td width="29%" style="BORDER-bottom: #E7E7E7 1px dashed"><font color="#999999">[<%=FormatDateTime(RS("AddDate"),2)%>] (点击<font color="#ff0000"><%= RS("HITS") %></font>) </font></td>
                    </tr>
                    
<%
rs.movenext
if rs.eof then exit for
next
%>
                    
                    <tr valign="bottom">
<TD Align=center valign=middle height=50 colspan=3>
<form method=Post action="NewsClass.asp?BigClass=<%=BigClass%>&SmallClass=<%=SmallClass%>">
                        <%if Page<2 then      
    response.write "首页 上一页&nbsp;"
  else
    response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=1>首页</a>&nbsp;"
    response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=" & Page-1 & ">上一页</a>&nbsp;"
  end if
  if rs.pagecount-page<1 then
    response.write "下一页 尾页"
  else
    response.write "<a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&page=" & (page+1) & ">"
    response.write "下一页</a> <a href=NewsClass.asp?BigClass="&BigClass&"&SmallClass="&SmallClass&"&SmallClass="&SmallClass&"&page="&rs.pagecount&">尾页</a>"
  end if
   response.write "&nbsp;页次：<strong><font color=red>"&Page&"</font>/"&rs.pagecount&"</strong>页 "
    response.write "&nbsp;共<b><font color='#FF0000'>"&rs.recordcount&"</font></b>条记录 <b>"&rs.pagesize&"</b>条记录/页"
   response.write " 转到：<input type='text' name='page' size=4 maxlength=10 class=input value="&page&">"
   response.write " <input class=input type='submit'  value=' Goto '  name='cndok'></span></p>"     
%>
                    </form></TD>
                    </tr>
                    <% 
end if
rs.close
set rs=nothing
%>














              </table>			
			</td>
          </tr>
        </table>
      <table width="753" height="15" border="0" cellpadding="0" cellspacing="0">
          <tr>
            <td><img src="imgbyl/ab8.gif" width="753" height="15" /></td>
          </tr>
      </table></td>
  </tr>
</table>



<!--#include file="foot.asp" -->