Office中国论坛/Access中国论坛

标题: 一个类似网页上的分页显示的例子 [打印本页]

作者: 红尘如烟    时间: 2009-12-29 19:05
标题: 一个类似网页上的分页显示的例子
[attach]41006[/attach]
[attach]41007[/attach]
[attach]41008[/attach]
作者: chaojianan    时间: 2009-12-29 19:39
谢谢分享,收藏了。
作者: asklove    时间: 2009-12-30 14:22
学习
作者: xuwenning    时间: 2009-12-31 10:09
学习了
谢谢分享
作者: luke99    时间: 2009-12-31 10:19
看看
作者: ycxchen    时间: 2010-1-1 09:37
谢谢分享,收藏了。
作者: wzh    时间: 2011-1-8 20:44
谢谢分享,收藏了。
作者: 冚友    时间: 2011-1-8 21:26
学习了

作者: szyewj    时间: 2011-5-10 23:52
谢谢分享,收藏了
作者: xingzhihao    时间: 2011-12-4 15:12
这个不错,但是如何加入条件呢(例如:联系人叫“李娜”)?我反复修改,不得要领。各位高人,指点一下。
就是这句SQL  怎么改?
        strSQL = "SELECT  TOP " & lngPageSize & " * FROM tblCustomers WHERE " & _
                 "Id>(SELECT Max(Id) FROM (SELECT TOP " & lngPageSize * (mlngCurrentPage - 1) & " Id FROM tblCustomers)) " & _
                 "ORDER BY Id;"

作者: 风中漫步    时间: 2011-12-5 13:57
谢谢收藏了
作者: 风中漫步    时间: 2011-12-5 14:28
xingzhihao 发表于 2011-12-4 15:12
这个不错,但是如何加入条件呢(例如:联系人叫“李娜”)?我反复修改,不得要领。各位高人,指点一下。
...

呵呵,斑竹的东西理应他告诉你.这样,我替斑竹说了
    If mlngCurrentPage = 1 Then
        strSQL = "SELECT TOP " & lngPageSize & " * FROM tblCustomers  where Linkman='李娜' ORDER BY Id"
    Else
        strSQL = "SELECT  TOP " & lngPageSize & " * FROM tblCustomers WHERE " & _
                 "Id>(SELECT Max(Id) FROM (SELECT TOP " & lngPageSize * (mlngCurrentPage - 1) & " Id FROM tblCustomers where Linkman='李娜' )) " & _
                 " ORDER BY Id;"
    End If

作者: shenyao_jx    时间: 2012-1-3 14:18
学习学习。。。。。。
作者: 快乐向前走    时间: 2018-10-1 17:04
非常好非常好非常好非常好非常好非常好非常好非常好非常好非常好非常好非常好




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3