一个上下 移动后的翻页问题

[chang1216]

在每页的最后一行下移的时候不能到下一页， 这是为什么。 而是直接到了最后一页 同样第二页的第一条上移应该返回第一页啊 他也直接到了第三页
郁闷中 请求帮助
我的翻页是这样的
<%
if request("new_select")<>"" then
sql="lanchina_new_manage_query "&request("new_select")&",'"&request("new_key")&"'"
else
sql="lanchina_new_manage"
end if
set rscyc=server.CreateObject("adodb.recordset")
rscyc.CursorLocation = 3
rscyc.open sql,conn,1,3
i=0
if rscyc.eof then
response.write("目前还没有新闻纪录！！")
else
rscyc.pagesize=5

if request("page")="" then
session("page")=1
else

session("page")=eval(session("page") & request("page"))
if session("page")<1 then
session("page")=1
end if
if session("page")>rscyc.PageCount then
session("page")=rscyc.PageCount
end if
end if
rscyc.AbsolutePage=session("page")

j=0
do while not rscyc.eof and j<rscyc.pagesize
j=j+1
i=rscyc.pagesize*(session("page")-1)+j
%>
<tr>
<td><span class="STYLE9">
<label>
<input type="checkbox" name="new_id" value="<%=rscyc("new_id")%>"/>
</label>
</span> </td>
<td><span class="STYLE9"><%=Server.HtmlEncode(left(rscyc("new_title"),12))%></span></td>
<td><span class="STYLE9"><%=Server.HtmlEncode(rscyc("new_titlesub"))%> </span></td>
<td><span class="STYLE9"><%=Server.HtmlEncode(rscyc("new_person"))%></span></td>
<td><span class="STYLE9"><%=Server.HtmlEncode(rscyc("new_readcount"))%></span></td>
<td><span class="STYLE9"><%=rscyc("new_passed")%></span></td>
<td><span class="STYLE9"><%=rscyc("new_top")%> </span></td>
<td><span class="STYLE9"><%=rscyc("new_type")%></span></td>
<td>

<%
If i=1 then
response.write "no"
%>
<%else
if j=1 then
page=session("page")-1
else
page=session("page")
end if

%>
<a href="up_pro.asp?new_idsub=<%=rscyc("new_idsub")%>&page=<%=page%>&j=<%=j%>">
<font color="blue">上移</font></a>

<%End if%> |
<%If i=rscyc.recordcount then
response.write "no"
%>
<%else

if j=rscyc.pagesize then
page=session("page")+1
else
page=session("page")
end if
%>

<a href="down_pro.asp?new_idsub=<%=rscyc("new_idsub")%>&page=<%=page%>">
<font color="blue">下移</font></a>
<%End if%>

</td>
</tr>
<%
rscyc.movenext
loop
' end if
%>

[libao1983]

最怕一上来描述都描述不清楚就刷刷刷的贴代码的。

[yunxiang2005]

和楼上有同感!现在都不清楚你提的是什么问题!

[chang1216]

在每页的最后一行下移的时候不能到下一页， 这是为什么。 而是直接到了最后一页 同样第二页的第一条上移应该返回第一页啊 他也直接到了第三页
郁闷中 请求帮助

[libao1983]

<a href="down_pro.asp?new_idsub=<%=rscyc("new_idsub")%>&page=<%=page%>">

page应该+1吧？

[chang1216]

我已经加了 哥们

if j=rscyc.pagesize then
page=session("page")+1
else
page=session("page")
end if
这里就是阿 可是不知道 为什么

[chang1216]

应该是其他地方的问题 麻烦大家帮我看看 着急啊 研究了一天了 就差这么一点

[chang1216]

没有人做过 类似的程序？ 大家帮我看看吧 谢谢了 我也研究一下 大家也帮忙 看看