我这段翻页代码哪里有错误啊,个位大侠
<!--#include file="conn.asp"-->
<%
set rs=server.createobject("adodb.recordset")
sql="select * from web "
rs.open sql,conn,1,1
rs.pagesize=6
page=request("page")
if not rs.eof then
if page="" or page<1 then page=1
rs.absolutepage=page
end if
rs.absolutepage=page
%>
<html><head><meta http-equiv="Content-Type" content="text/html; charset=gb2312"><title></title>
<link href="css/css.css" rel="stylesheet" type="text/css">
</head>
<body leftmargin="0" topmargin="0" bgcolor="#FFFFFF">
<table width="800" border="0">
<tr>
<td width="20%" valign="top"><!--#include file="admin_left.asp"--></td>
<td width="80%" valign="top"><table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFCC00" width="510">
<tr>
<td height="24" bgcolor="#FFFFCC">
<p align="center"><b><font color="#FF0000">已验证通过站点列表</font></b></td>
<td width="100" bgcolor="#FFFFCC">
<div align="center"><a href="admin_list_true.asp?action=logo"><font color="#FF0000">首页推荐</font></a></div></td>
<td width="100" bgcolor="#FFFFCC">
<div align="center"><a href="admin_list_true.asp?action=text"><font color="#FF0000">TOP10评选</font></a></div></td>
<td width="100" align="center" bgcolor="#FFFFCC"><a href="admin_list_true.asp?action=neiye"><font color="#FF0000">特别推荐</font></a></td>
</tr>
</table>
<%
if not rs.eof then
for i=1 to rs.pagesize
if rs.eof then exit for %>
<table border="1" cellpadding="2" cellspacing="0" style="border-collapse: collapse" bordercolor="#FFCC00" width="600">
<tr>
<td width="83" align="center" bgcolor="#EFEFEF">网站对应广告</td>
<td width="60" align="center" bgcolor="#EFEFEF"> </td>
<td width="337" align="center" bgcolor="#EFEFEF"> </td>
<td width="42" align="center" bgcolor="#EFEFEF">
<div align="center">修 改</div></td>
<td width="46" align="center" bgcolor="#EFEFEF">删 除</td>
</tr>
<tr>
<td rowspan="2" align="center"><a href="open.asp?id=<%=rs("id")%>&url=<%=rs("url")%>" target="_blank">
</a></td>
<td height="24" align="center">网站名称:</td>
<td align="center"><div align="left"><a href="<%=rs("url")%>" target="_blank"><%=rs("webname")%></a> </div></td>
<td rowspan="2" align="center"><a href="modify.asp?id=<%=rs("id")%>"><img border="0" src="images/button_edit.gif"></a></td>
<td rowspan="2" align="center"><a href="deldata.asp?id=<%=rs("id")%>"><img border="0" src="images/button_del.gif"></a></td>
</tr>
<tr>
<td height="24" align="center">网址:</td>
<td align="center"><div align="left">
<%=rs("url")%>
</div></td>
</tr>
<tr>
<td height="69" colspan="5</td>
</tr>
</table>
<table width="504" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="504" align="center">
<% rs.movenext
next
if rs.pagecount>0 then rs.moveprevious
end if
%>
<table width="600" border="0" cellspacing="0" cellpadding="0">
<tr>
<td align="center"><%=rs.pagesize%>条/页 第<%=page%>页
<% if rs.absolutepage>1 then response.write("<a href='?&"&page=1&"'>")%>
首页</a>
<% if rs.absolutepage>1 then response.write("<a href='?"&"&page="&rs.absolutepage-1&"'>")%>
上一页</a>
<% if rs.absolutepage<rs.pagecount then response.write("<a href='?"&"&page="&rs.absolutepage+1&"'>")%>
下一页</a>
<% if rs.absolutepage<rs.pagecount then response.write("<a href='?"&"&page="&rs.pagecount&"'>")%>
尾页</a></div></td>
</tr>
</table>
</td>
</tr>
</table>
</body></html>