Usando O Top Em Um Select

[Guest Rodrigo Araujo]

Quero criar uma consulta Select Top n... que me retorne os 50 primeiros registros da tabela, depois pressiono um botão e repito a consulta, só que desta vez pego os próximos 50 registros, sem repetir os primeiros e assim por diante.

Se puderem me ajudar agradeço.

[Eddie_666]

rst = SELECT * FROM tabela;

dim j as integer
static i as integer
i = 1
rst.movefirst
while not rst.eof 
    for j = 50*(i-1) to (50 * i ) -1
         if not rst.eof then
             'mostra registro
              rst.movenext
         end if
    next
    i = i +1
wend

Eu fiz rápido e não testei, mas a lógica é essa...