VB 查询语句（上翻一段、下翻一段查询结果）

显示全部楼层 · 2011-4-28 14:29:26

Case 0: query = "selecttop 20 * from 报警记录 where报警名称 = '" & Text1.Text & "'order by 报警ID desc"
如果我想要加个两个command 分别是往下和往上翻20个记录的话查询语句该如何写呢

千问 · 2011-4-28 14:29:26

Dim pageCount As Integer '记录总页数Dim nowPage As Integer '记录当前页先得到总页数，每页20条数据的话总页数就是 pagecount=rs.count/20上一页nowPage=nowPage-1下一页nowPage=nowPage+1做下是否到达最首页和最末页的判断...if nowpage=pagecount,自已做下处理查询语法＝"selecttop 20 * from 报警记录where报警id not in (select top " & nowPage*20 & " 报警id from 报警记录 where报警名