| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 406 人关注过本帖
标题:翻页过程中出现的问题?
取消只看楼主 加入收藏
lcd2105
Rank: 1
等 级:新手上路
帖 子:41
专家分:0
注 册:2006-8-22
收藏
 问题点数:0 回复次数:1 
翻页过程中出现的问题?
我需要根据单位翻页,所以加了红色部分的代码.
记录的条数和页码是正确的,但在点击下一页后 显示记录为零?这是错在哪?

<%
if rs.EOF then Response.Write " <p align=center> <font size=6 color=#FF0000 class=info> <br> <br> <br>记录为零 </font>"

if not rs.EOF then
pagesize=4
rs.PageSize = pagesize
page=request("page")
if page="" then page=1
if cint(page)>rs.pagecount then page=rs.pagecount
if page <>0 then rs.AbsolutePage = page
for i=1 to pagesize  

if rs.EOF then exit for
%>

'中间略

<%   rs.movenext  '读下一条记录
next
Response.Write " <form onsubmit='return(testforms(this));'action=syqyadmin.asp?danwei='"&danwei&"' method=post id=form2 name=form2>"
Response.Write " <table width=80% class=query> <tr> <td nowrap> <font class=page>"
if cint(page) <>1 then Response.Write " <a href='syqyadmin.asp?danwei="&danwei&"page=1'>第一页 </a>?"
if cint(page)>1 then Response.Write " <a href='syqyadmin.asp?danwei="&danwei&"page=" & page-1 & "'>上一页 </a>?"
if cint(page) <>rs.pagecount then Response.Write " <a href='syqyadmin.asp?danwei="&danwei&"page=" & page+1 & "'>下一页 </a>?"
if cint(page) <>rs.pagecount then Response.Write " <a href='syqyadmin.asp?danwei="&danwei&"page=" & rs.pagecount & "'>最后页 </a>?"
Response.Write "转至 <input name=page size=2>"
Response.write "页 <input type=submit value=go id=submit1 name=submit1>?第" & page & "页/共" & rs.pagecount & "页"
Response.write "?本页" & i-1 & "条/记录总数:" & rs.RecordCount & "条 </form>"
end if
%>

[[it] 本帖最后由 lcd2105 于 2008-4-16 18:28 编辑 [/it]]
搜索更多相关主题的帖子: request center color 记录 
2008-04-16 18:15
lcd2105
Rank: 1
等 级:新手上路
帖 子:41
专家分:0
注 册:2006-8-22
收藏
得分:0 
有谁帮帮我?
2008-04-16 18:32
快速回复:翻页过程中出现的问题?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.028047 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved