<!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>
<!--#include file="conn.asp"-->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title><%=website_name%></title>
<meta name="keywords" content="<%=website_name%>" />
<meta name="description" content="<%=website_name%>" />
<link href="/images/css.css" rel="stylesheet" type="text/css"/>
</head>
<body>
<!--#include file="top.asp"-->
<div class="comment">
	<div class="w240 fl">
		<h2>栏目导航</h2>
		<ul>
			<%
				sql="select * from [news_class] order by id desc"
				Set rs = Server.CreateObject("ADODB.Recordset")
				rs.open sql,conn,1,1
				while not rs.eof
				 %>
			<li><a href="/news.asp?nclass=<%=rs("id")%>"><%=rs("news_class_name")%></a></li>
			<%
				rs.movenext()
				wend
			%>
			<%
			rs.close()
			set rs=nothing
			%>
		</ul>
		<div class="c10"></div>
	</div>


		<div class="w710box w60 fr">
			<h2 class="th2"><% if h1title<>"" then  %><%=h1title%><%else%>新闻资讯<%end if%></h2>
			<div class="c20"></div>
			<div class="w650box">	
			<ul style="width:650px;margin-left:20px;">
<%
dim search_sql,search_class,filego
search_class=request("nclass")
filego="news.asp?nclass="&search_class
search_sql="select * from [news] where 1=1"
if search_class<>"" and search_class<>"不限" then
      search_sql=search_sql & " and nclass="&search_class
end if
search_sql=search_sql & " order by pubdate desc"
set rs=Server.CreateObject("ADODB.RecordSet")
rs.open search_sql,conn,1,1

	if not rs.eof then 
    rs.PageSize = 15 '每页显示记录数
    If Request("page")<>"" and IsNumeric(Request("page"))  Then 
	page=cint(Request("page"))
	End If
	if page<=0 then
		page=1
	end if
	 if page>Rs.PageCount then
	page=Rs.PageCount
	end if
	Rs.AbsolutePage=page
	currentpage=page
	
	for i=1 to 15 %>
								
				<li style="height:40px;line-height:40px;"><span class="fr" style="margin-right:20px;"><%=rs("pubdate")%></span><a href="show_news.asp?id=<%=rs("id")%>" target="_blank"><%=rs("title")%></a></li>
				
				<%
				rs.movenext()
				if rs.eof then
				exit for
				end if
				next
				%>
			</ul>
			
			
			<div class="fenye" style="height:30px;margin-top:20px;margin-left:20px;">共有<font color=red><%=Rs.RecordCount%></font>条信息 | 每页显示<font color=#D90000><%=Rs.PageSize%></font>条信息 | 共有<font color=#D90000><%=Rs.PageCount%></font>页 | 当前第<font color=#D90000><%=page%></font>页 | <a href="<%=filego%>&page=<%=1%>">首页</a> | <a href=<%=filego%>&page=<%=page-1%>>上页</a>  | <a href=<%=filego%>&page=<%=page+1%>>下页</a> | <a href=<%=filego%>&page=<%=Rs.PageCount%>>尾页</a></div>

				<%rs.close()
				set rs=nothing
				%>
				
				
	<%else%>
	<li>没有找到相关记录</li>
	</ul>	
	<% end if%>		
				
</div>

</div>


</div>

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

</body>
</html>