asp分页连接错误，请高手看看
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%><!--#include file="xyconn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/xycms.asp"-->
<!--#include file="page.asp"-->
<%
bigclassid=request.QueryString("bigclassid")
smallclassid=request.QueryString("smallclassid")
set rst=server.createobject("adodb.recordset")
if bigclassid="" then
exec="select * from products order by id desc"
end if
if bigclassid<>"" then
exec="select * from products where BigClassID="&bigclassid&" order by id desc"
end if
if bigclassid<>"" and smallclassid<>"" then
exec="select * from products where BigClassID="&bigclassid&" and SmallClassID="&smallclassid&" order by id desc"
end if
rst.open exec,conn,1,1
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.
<html xmlns="http://www.
<head>
<meta http-equiv="X-UA-Compatible" content="IE=7" />
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<meta name="keywords" content="" />
<meta name="description" content="" />
<link href="style/index.css" type="text/css" rel="stylesheet" />
<script type="text/javascript" src="js/jquery.min.js"></script>
<script type="text/javascript" src="js/slideplay.js"></script>
<title>产品展示_<%=wzname%></title>
<!--[if lte IE 6]>
<script src="js/DD_belatedPNG_0.0.8a.js" type="text/javascript"></script>
<script type="text/javascript">
DD_belatedPNG.fix('div, ul, img, li, input , a');
</script>
<![endif]-->
</head>
<body>
<!--#include file="head.asp"-->
<div id="cont">
<div class="c_l">
<div class="c_l_t"><h3 class="title">产品类别</h3></div>
<div class="c_l_c">
<div class="c_l_tree">
<div id="menubox">
<ul>
<%=xycms_productsbigfl()%>
</ul>
</div>
</div>
</div>
<div class="c_l_t"><h3 class="title">联系我们</h3></div>
<div class="c_l_c">
<div class="c_l_c_c">
<ul>
<%=xycms_contact()%>
</ul>
</div>
</div>
</div>
<div class="c_r">
<div class="c_r_t"><h3 class="title">产品展示 > 信息列表</h3></div>
<div class="c_r_c">
<div class="pro_list">
<ul>
<% if rst.eof then
response.Write "<li>暂无该类产品信息记录！</li>"
else
rst.PageSize =16
iCount=rst.RecordCount
iPageSize=rst.PageSize
maxpage=rst.PageCount
page=request.querystring("page")
if Not IsNumeric(page) or page="" then
page=1
else
page=cint(page)
end if
if page<1 then
page=1
elseif page>maxpage then
page=maxpage
end if
rst.AbsolutePage=Page
if page=maxpage then
x=iCount-(maxpage-1)*iPageSize
else
x=iPageSize
end if
end if
For i=1 To x %>
<li><a href="pro_detail.asp?id=<%=rst("id")%>" target="_blank"><img src="<%=rst("img")%>" width="160" height="116" /></a><span><a href="pro_detail.asp?id=<%=rst("id")%>" target="_blank"><%=left(rst("title"),10)%></a></span></li>
<% rst.movenext
next %>
</ul>
<div class="clear"></div>
<div class="dc_pages"><% call PageControl(iCount,maxpage,page,"border=0 align=center","<p align=center>")
rst.close
set rst=nothing %></div>
</div>
</div>
</div>
<div class="clear"></div>
</div>
<!--#include file="foot.asp"-->
</body>
</html>
