| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 893 人关注过本帖
标题:显示新闻标题列表的问题~毕业设计急需!!!!!!
只看楼主 加入收藏
wyang8574
Rank: 1
等 级:新手上路
帖 子:4
专家分:0
注 册:2008-6-6
收藏
 问题点数:0 回复次数:7 
显示新闻标题列表的问题~毕业设计急需!!!!!!
想做个显示新闻标题的列表,每行标题后面有“查看”和“删除”两个选项,设置为每页显示10条
但运行后发现数据表中的20条数据全显示在了第一页上,而第二页则显示的后10条数据,看了下代码也没发现什么错误,小弟菜鸟,请各位大侠指点迷津...谢谢!!!!!!!!

具体代码如下:

<tr>
     <td width="538" height="370" colspan="2" align="center" valign="top">
       <%
         dim sql,rs
         Set conn = Server.CreateObject("ADODB.Connection")
         conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db.mdb")
         set rs=server.CreateObject("adodb.recordset")
         sql="select * from news  order by date desc"
         rs.open sql,conn,1,1
         if rs.eof and rs.bof then
         response.Write"目前没有记录"
         response.end
         else
         rs.pagesize=10
         page=request.QueryString("page")
         if not isnumeric(page) then page=1
         if isempty(page) or cint(page)<1 then page=1
         if cint(page)>rs.pagecount then page=rs.pagecount
         end if
         rs.absolutepage=page
       %>
      <%
        for i=1 to rs.recordcount
       %>
       <table width="500" height="30" border="0" cellpadding="0" cellspacing="0">
          <tr>
             <td width="340" height="30" align="left" valign="middle" class="STYLE9">
               <%=rs("title")%>
                 </td>
             <td width="20" align="left" valign="middle" class="STYLE9">
                </td>
             <td width="70" height="30" align="center" valign="middle">
                <a href="<%=rs("content")%>  class=" class="STYLE9"" >查看 </a>
                   </td>
              <td width="70" height="30" align="center" valign="middle">
                 <a href="admin_newsdelete.asp?id=<%=rs("id")%>" class="class="STYLE9">
                    删除
                    </a>   
                 </td>
             </tr>
          <%
              rs.movenext
              if rs.eof then exit for
              next
             %>
           </table>
    </td>
 </tr>
        
<tr>
      <td width="538" height="50" colspan="2" align="center" valign="middle">
        <p align="center">
          <a href="admin_news.asp?page=1">首页</a> 
          <a href="admin_news.asp?page=<%=page-1%>">上一页</a> 
          <a href="admin_news.asp?page=<%=page+1%>">下一页</a> 
          <a href="admin_news.asp?page=<%=rs.pagecount%>">最后页</a>
          </p>
        <p align="center">现在是第<%=page%>页一共有<%=rs.pagecount%>页</p>
        <%
            conn.close()
         %>
       </td>
</tr>
搜索更多相关主题的帖子: 新闻标题 毕业设计 列表 数据 
2008-06-07 16:47
fangxiaoju
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2008-6-12
收藏
得分:0 
我也不知道,对不对,我好象有看到类似的
do while not rs.eof and i<10
..................
................
.................
...............
rs.movenext
i=i+1
loop
2008-06-20 20:10
fangxiaoju
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2008-6-12
收藏
得分:0 
其中I=rs.pagesize=10
2008-06-20 20:11
xiongjl9555
Rank: 2
来 自:深圳南山区
等 级:论坛游民
帖 子:124
专家分:10
注 册:2008-5-27
收藏
得分:0 
上面兄弟说的对,我用过这样的语句,必须用“do while not rs.eof and i<10
”这句。
2008-06-20 21:19
天涯听雨
Rank: 2
来 自:东莞
等 级:论坛游民
威 望:4
帖 子:497
专家分:64
注 册:2007-8-25
收藏
得分:0 
for i=1 to rs.recordcount

改成:

for i=1 to rs.pagesize

你循环显示,不是循环所有的,而只是一页的。。

从明天起做幸福的人,喂马劈柴周游世界!
2008-06-21 11:57
fangxiaoju
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2008-6-12
收藏
得分:0 
我不是兄弟,可好
2008-06-21 13:17
hmhz
Rank: 7Rank: 7Rank: 7
等 级:贵宾
威 望:30
帖 子:1890
专家分:503
注 册:2006-12-17
收藏
得分:0 
楼上安徽哪的?

[编程论坛] ASP超级群:49158383  敲门暗号:ASP编程
龍艺博客 http://www.
2008-06-21 13:54
fangxiaoju
Rank: 1
等 级:新手上路
帖 子:23
专家分:0
注 册:2008-6-12
收藏
得分:0 
你是说我,还是谁
2008-06-21 17:26
快速回复:显示新闻标题列表的问题~毕业设计急需!!!!!!
数据加载中...
 
   



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

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