如何实现翻页(50),如实现,确保给分.谢谢(50分)

L

lpc_735700

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-28

• #1

我正在做一个VOD视频点播系统.使用QUERY进行查询.当查询结果很多时,例如查流行歌曲时,可能有几百首,这时需要分页显示.例如每十条记录一页.然后做两个按扭,"上一页"和"下一页"进行翻页.
在首页上的SQL语句为:select top 10 * from tablename;
已实现.

问题:,"上一页"和"下一页"上的代码应如何编写,才会实现翻页;请写原码(加分).[]
加油啊!

 

Y

youbang

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-28

• #2

你要一行一行显示肯定要用到Query.Next 那只要你下页不关闭Query就可以直接移动到第11条纪录，然后做一个页码数据，翻一页加一即可，如果要翻上页，往上移动20条纪录就可以了阿。。

 

A

app2001

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-28

• #3

2.用ADO，指定pagesize:=10；Open；
而后absolutePage:=2就可以到第二页（第11条开始）
adoquery1.Open;
adoquery1.Recordset.PageSize:=20;
adoquery1.Recordset.AbsolutePage:=1;

 

A

anan100

Unregistered / Unconfirmed

GUEST, unregistred user!

• 2004-04-28

• #4

sql语句为
select * from tablename
按扭1
Query.MoveBy(10);
向上翻一页
按扭2
Query.MoveBy(-10);
向下翻一页

其实不是真正意义上的番页,而是指针移动一页的宽度,也可以达到反页的效果