Adodc

[Adri58]

Como se puede buscar el registro siguiente al actual en una BD con un Adodc? Es que no tiene findNext, solo tiene find y no se como hacerlo

[CeLaYa]

  que no se hace con MoveNext

Código [Seleccionar] Expandir


Adodc1.Recordset.MoveNext



[soplo]

Hola
El formato de find es

Código [Seleccionar] Expandir

adodc1.recordset.find "criterio de búsqueda",salto,dirección

Criterio de búsqueda
es lo que iría detrás de un where en una claúsula select

salto
Es desde donde tiene que empezar a buscar. Si no se indica busca desde el principio, pero si se indica busca desde ese registro (a partir de la posición actual).

Si no encuentra nada llega a eof
Puede ser un valor positivo o negativo indicando cuantos registros hay que avanzar o retroceder.
Así, buscar desde el principio sería
adodc1.recordset.find "condicion"
Y buscar en el siguiente registro sería

Código [Seleccionar] Expandir

adodc1.recordset.find "condicion",1
Dirección
Si no se especifica nada se busca hacia delante (adsearchforward). Si se especifica adsearchbackward la búsqueda es hacia atrás.

También te puede interesar el hacer un filtro de datos. Esto suponde utilizar la propiedad filter del recordset para extraer los datos que cumplen una condición

Código [Seleccionar] Expandir

adodc1.recordset.filter="condicion"
do while not adodc1.recordset.eof
   operación con registro que cumple condicion
   adodc1.recordset.movenext
loop
Para volver a la situación anterior al filter

Código [Seleccionar] Expandir

adodc1.recordset.filter=""

y volverás a tener el recordset normal

Un saludo