Hola amigo...
Hay varias formas de Hacerlo:
1. Indexando una tabla, que me parece a mi es el mas rapido.
se debe indexar la tabla, es decir, debe agregar un indice en la estructura. el indice debe ser del mismo tipo y tamaño de lo que usted quiere buscar.
por ejemplo si busca una clave que se esta almacenando en un campo llamado password de 20 caracteres, entonces debe indexar este campo en la estructura y colocarle un nombre, por ejemplo clavecita.
Use Claves &&la tabla se llama claves
set order to clavecita
cl=Thisform.text1.value &&control se llama text1
Seek alltrim(cl)
If found()
* ....encontro la clave
Else
*No encontro la clave
Endif
este metodo es el mas rapido,pero siempre mustra la primera clave coincidente.
2. utilizando una busqueda secuencial, pero es lento si existen muchos datos
esto es con la funcion locate
use claves alias clav
cl=Thisform.text1.value &&control se llama text1
locate for alltrim(clav.clave)=alltrim(cl)
busca secuencialmente junto con la instruccion Continue.(metodo lento cuando hay muchos datos)
3. Por medio de un filtro
es tambien muy lento cuando existen muchos datos, pero es util si usted necesita encerrar todos los datos que tengan la misma clave
use claves
cl=Thisform.text1.value &&control se llama text1
Set filter to alltrim(clave)=alltrim(cl)
brow
Espero que te sirva de ayuda
Willington rincon
[email protected]