set rs=server.createobject("adodb.recordset")
sql="SELECT * FROM fk_news_list WHERE classID ="& X
response.write(X)
rs.CursorLocation = 3
Rs.OPEN sql, Conn,1,3
%>
<%
if not isempty(request("page")) then
pagecount=cint(request("page"))
else
pagecount=1
end if
n=1
rs.pagesize=8
rs.absolutepage=pagecount
do while not rs.eof
%>
<li class="list_con_li">
<h2 class="list_news_tit"><a><%=rs("title")%></a></h2>
<span class="list_news_info"><%=rs("datetime")%></span>
<div class="box2"><%=rs("title")%><a href="" target="_blank">【阅读全文】</a></div>
</li>
<%
rs.movenext
n=n+1
if n>rs.pagesize then exit do
loop
%>
</ul>
</div>
<form method="get" action="guide.asp" name="form1">
<div class=pages>
<span><%=rs.recordcount%></span>
<span><%=pagecount%>/<%=rs.pagecount%></span>
<span>
<a href="guide.asp?page=<%=1%>&classid=id">首页</a>
<%if pagecount>1 then %><a href="guide.asp?page=<%=cint(pagecount-1)%>&classid=2">上页</a>
<% else %>上页<% end if %>
<%
m=rs.pagecount
for i=1 to m %>
<%=i%>
<%next%>
<%if pagecount=1 or pagecount<>rs.pagecount then %><a href="guide.asp?page=<%=cint(pagecount+1)%>">下页</a>
<% else %>下页<% end if %>
<a href="guide.asp?page=<%=rs.pagecount%>&classid=2">末页</a>
</span>
</div>
<form>