continuacion sentencia validar y busqueda
Publicado por Jessy (22 intervenciones) el 07/11/2006 17:58:24
estoy utilizando el siguiente codigo para validar en el lost focus pero al anexar un registro asi no exista , me indica que si existe.
Locate for tblpuntodeventa.nombre_PV = thisform.txtNombre_pv.value
If Found() then
messagebox("el dato ya existe, intentelo de nuevo",0+48,"Validando")
thisform.txtNombre_pv.value=" "
thisform.txtNombre_pv.Setfocus()
else
wait window "Ingresando Datos" nowait
endif
*********************************BUSQUEDA**************************************************
select * from tabla where campo like '%campo%'
pero no me muestra nada dime tengo que crear un cursor y como lo hago, para que me muestre los datos en cualquer orden de busqueda en un formulario....
Locate for tblpuntodeventa.nombre_PV = thisform.txtNombre_pv.value
If Found() then
messagebox("el dato ya existe, intentelo de nuevo",0+48,"Validando")
thisform.txtNombre_pv.value=" "
thisform.txtNombre_pv.Setfocus()
else
wait window "Ingresando Datos" nowait
endif
*********************************BUSQUEDA**************************************************
select * from tabla where campo like '%campo%'
pero no me muestra nada dime tengo que crear un cursor y como lo hago, para que me muestre los datos en cualquer orden de busqueda en un formulario....
Valora esta pregunta


0