FoxPro/Visual FoxPro - Estudiante

 
Vista:

Estudiante

Publicado por Diego (1 intervención) el 09/11/2004 15:20:03
Necesito hacer una búsqueda en un formulario de por ejemplo clientes.
Que me localice mediante un cuadro de búsqueda el registro x.
Por ejemplo, para ver si existe el cliente. Se puede dar el caso de que exista.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:Estudiante

Publicado por Saul (362 intervenciones) el 09/11/2004 16:19:10
busca en la ayuda

como hacer SELECT SQL , y ve lo que comenta de LIKE.

CLOSE ALL
CLOSE DATABASES
OPEN DATABASE (HOME(2) + 'data\testdata')
SELECT * FROM customer x WHERE x.company LIKE "C%"

Este ejemplo te esta haciendo una consulta de todos los clientes que inicien con la letra "C"


Suerte..
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Estudiante

Publicado por Edgar Zambrano (90 intervenciones) el 10/11/2004 00:29:32
existen varias formas de realizar busquedas, puedes realizarlas por medio de SQL, SEEK() o LOCATE, todos dependen de como tu lo implementes. te envio unos ejemplos de como puedes usar SEEK(), y LOCATE()

puedes implementar esto en el evento valid de un textbox
*SEEK()
select clientes

set order to cod_cli

seek(thisform.txtCod_cli.value)

if found()
*los datos que desees mostrar en pantalla
else
wait windows 'cliente no encontrado' nowait
endif

con este código realizas una busqueda en la tabla clientes, por medio del código del cliente.

*LOCATE()
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:Estudiante

Publicado por Edgar Zambrano (90 intervenciones) el 10/11/2004 00:34:12
esta es la continuación del mensaje anterior.
*LOCATE()

select clientes

set talk off

locate for clientes.cod_cli = thisform.txtCod_cli.value

if found()
*los datos que desees mostrar en pantalla.
else
wait windows 'cliente no encontrado' nowait
endif

espero y sea lo que necesitas. si alguna otra opinión puedes preguntarsela al foro o me puedes escribir al correo.

Edgar Zambrano
Programador VFP
[email protected]
Soledad - Atlántico - Colombia.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar