这个分页程序错在哪啊?请大家帮下。。
laers 2004-04-08 06:29:11 <%
' 数据已链接成功!
rs.pagesize=2
nowpage=request("page")
if isempty(nowpage) then
rs.absolutepage=1
else if nowpage>rs.pagecount then
rs.absolutepage=rs.pagecount
else
rs.absolutepage=nowpage
end if
end if
%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>无标题文档</title>
</head>
<body>
<table width="75%" border="1" align="center">
<tr>
<td><div align="center">id</div></td>
<td>AA</td>
<td>BB</td>
</tr>
<%sub fin%>
<tr>
<td><%=rs("id")%></td>
<td><%=rs("aa")%></td>
<td><%=rs("bb")%></td>
</tr>
<%end sub%>
<%
for i=1 to rs.pagesize
fin
if rs.eof then
exit for
end if
rs.movenext
next
%>
</table>
<br>
<table width="75%" border="1" align="center">
<tr>
<td width="27%"><a href="page.asp?page=1">第一页</a></td>
<td width="25%"><a href="page.asp?page=<%=nowpage+1%>">下一页</a></td>
<td width="18%"><a href="page.asp?page=<%=nowpage-1%>">上一页</a></td>
<td width="30%"><a href="page.asp?page=<%=rs.PageCount%>">最后一页</a><td>
</tr>
</table>
</body>
</html>