请高手们指点

[lghlgh_1121]

<!--#include file="conn.asp"-->
<link type="text/css" rel="stylesheet" href="css.css" />
<bgsound src="muse/上帝是个女孩.mp3" loop="infinite"/>
<%
on error resume next
set rs= Server.CreateObject("adodb.recordset")
sql="select * from 留言表"
rs.open sql,conn,1,3
rs.pagesize=3
p=request("page")


if p="" or p<1 then
p=1
end if

if p>trim(rs.pagecount) then
p=rs.pagecount
end if


rs.absolutepage=p



%>
<div class="width">
<div class="bgc font">管理员回复  <a href="delete.asp" class="cl">删除留言</a>  <a href="input.asp">我要留言</a>  <a href="admin.asp">管理员登陆</a></div>

<table width="711" height="338" border="1" bordercolor="#FFCC99">
<%for i=1 to rs.pagesize%>
<tr>
<td width="123" height="21" bgcolor="#CCCCFF">发言人:<%=rs("发言人")%></td>
<td colspan="3" align="center" bgcolor="#CCCCFF"> 发言内容</td>
</tr>
<tr>
<td height="21" align="center" bgcolor="#CCCCFF">个人照片</td>
<td colspan="3" rowspan="2" bgcolor="#CCCCFF"><%=rs("内容")%></td>
</tr>

<tr>
<td height="122" bgcolor="#CCCCFF">这里是个人照片</td>
</tr>
<tr>
<td height="21" align="center" bgcolor="#CCCCFF">形象</td>
<td height="21" colspan="3" align="center" bgcolor="#CCCCFF">回复内容</td>
</tr>
<tr>
<td height="122" rowspan="2" bgcolor="#CCCCFF"><div align="center"><img src="pi/<%=rs("形象")%>" /></div></td>
<td height="106" colspan="3" bordercolor="#FFFFCC" bgcolor="#CCCCFF"> </td>
</tr>
<tr>
<td width="133" height="21" bgcolor="#CCCCFF"><img src="pi/qq.gif" width="16" height="16" /> QQ:<%=rs("QQ")%></td>
<td width="150" bgcolor="#CCCCFF">留言时间:<%=rs("时间")%>
</td>
<td width="277" bgcolor="#CCCCFF"><img src="pi/email.gif" width="16" height="16" /> Email:<%=rs("Email")%></td>
</tr>
<%rs.movenext
if rs.eof then
exit for
end if
next
%>
</table>
</div>

<a href=index.asp?page=1>首页</a>
<a href=index.asp?page=<%=p-1%>>上一页</a>
<a href=index.asp?page=<%=p+1%>>下一页</a>
<a href=index.asp?page=<%=rs.pagecount%>>末页</a>
<a href=index.asp><%=p%>/<%=rs.pagecount%>>末页</a>
我这个分页程序 不知道错在什么地方
怎么一回到首页 再点击下一页
它就自动跳到最后一页
请高手门指点指点哦

[jinjuduo]

把on error resume next去掉
看看报什么错