É de conhecimento de todos, que a localização de um registro pelo VB, começa da primeiro e vai até o último. Mas gostaria de fazer esta pesquisa em sentido contrário, ou seja, do último registro para o primeiro. Tentei mudar a forma de classificação do campo na tabela para Ordem Decrescente, mudei também o index para decrescente, so que também não da certo. Sei que poderia fazer uma consulta com as propriedade move e depois procurar para ver se tem outro registro, até chegar no mais atual, só que minha tabela é muito grande e isso poderia fazer com que o programa ficasse mais lento.

     É possível fazer este tipo de pesquisa? Do último registro para o primeiro.

    

     O código que eu uso é o seguinte:

"Dim banco as database

 dim tabe as recordset

 set banco = opendatabase (caminho)

 set tabe=banco.openrecordset(Tabela)

 tabe.Index = "Campo0"

 tabe.Seek "=", text1

 if tabe.nomatch then

        sequencia do código

else

        text2=tabe("Campo1")

        text3=tabe("Campo2"

        ...

 end if

Agradeço a todos

coloca o índice normal, move para o último e vem retrocedendo.

 

dim tabe as recordset

E se por acaso você utilizasse uma rotina sql?? Não ajudaria a filtrar esses registros em vez de "varrer" o banco de dados do inicio ao fim????

 

T+,

Eu acharia mais correto migrar do Dao para Ado que te dá masi flexibilidade nas consultas.

 

rs.open "select * from tabela order by campo desc"