国龙中频控制器:asp 分页问题

帮我看看
当最后一页的时候,没有上下页可以翻,怎么办
代码如下

<%
dim vid
vid=request.QueryString("ida")
exec="select * from C1 where ida='"&(vid)&"' order by id desc"
set rs=server.createobject("adodb.recordset")
rs.open exec,conn,3,3
%>
<%
dim page
page=Clng(request("page"))
rs.pagesize=8
if page<1 then page=1
if page>rs.pagecount then page=rs.pagecount
rs.Absolutepage=page
%>
<%
for i=1 to rs.pagesize
if rs.eof or rs.bof then exit for
%>
<table width="755" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
<tr>
<td width="40" rowspan="3" valign="top"><span style="color: #000000"><font size="2">片名:</font></span></td>
<td width="100" height="0" rowspan="2" align="center" valign="top"><font size="2"><%=rs("NAME")%></font></td>
<td width="615" valign="bottom"><font size="2">简介:<%=rs("SM")%></font></td>
</tr>
<tr>
<td valign="bottom"> <table width="588" border="0.0001" cellspacing="0.0001" cellpadding="0.0001">
<tr>
<td><hr align="left" color="#8AC162" width="38%" size=1></td>
</tr>
</table>
<table width="588" border="0.0001" cellspacing="0.0001" cellpadding="0.0001">
<tr>
<td width="164"><p><font size="2">时间:<%=rs("TIME")%></font></p></td>
<td width="100"><p><font size="2"><%=rs("va1")%><%=rs("idb")%><%=rs("id")%>1<%=rs("va2")%><%=rs("vb")%><%=rs("va3")%><br>
<%=rs("va1")%><%=rs("idb")%><%=rs("id")%>2<%=rs("va2")%><%=rs("vc")%><%=rs("va3")%><br><%=rs("va1")%><%=rs("idb")%><%=rs("id")%>3<%=rs("va2")%><%=rs("vd")%><%=rs("va3")%>
</font></p></td>
<td width="315"></td>
</tr>
</table></td></tr>

</table>
<table width="755" border="0.0001" cellpadding="0.0001" cellspacing="0.0001">
<tr>
<td width="38"><hr align="left" color="#52AD56" width="100%" size=1></td>
<td width="667"><hr align="left" color="#5F9139" width="100%" size=1></td>
<td width="47"></td>
</tr>
</table>
<%
rs.movenext
next
if rs.eof then
response.end
end if
%>
<table width="754" border="0.001" cellspacing="0.001" cellpadding="0.001">
<tr>
<td><hr size=1 bordercolor="#3A6DA5"></td>
</tr>
</table>
<table width="758" border="0.001" cellspacing="0.001" cellpadding="0.001">
<tr>
<td width="158"></td>
<td width="350" align="center">
请按
<%
if page<>1 then
response.write "<a href=la1.asp?ida="&rs("ida")&"&page=1>第一页</a> "
response.write "<a href=la1.asp?ida="&rs("ida")&"&page="&(page-1)&"&>上一页</a> "
end if
if page<>rs.pagecount then
response.write "<a href=la1.asp?ida="&rs("ida")&"&page="&(page+1)&">下一页</a> "
response.write "<a href=la1.asp?ida="&rs("ida")&"&page="&rs.pagecount&">尾页</a> "
end if
%>
查看更多电影
</td>