oDbfDataSet1:seek
Publicado: Lun Dic 12, 2011 12:26 pm
¿Como puedo hacer una búsqueda exacta en un campo indexado?
Utilizando el siguiente método y suponiendo que el valor del campo sea "manuel" y en el oEdit1 tecleo "m", el resultado de la búsqueda sale verdadera.
¿Qué puedo hacer para que lFound sea .t. solo cuando los valores sean exactos.
Quote:
METHOD Edit1Exit( oSender, oNextCtl ) CLASS TForm1
local lFound
IF ::oDbfDataSet1:seek ( ::oEdit1:Value, .t. )
MsgInfo( "Encontrado " + ::oEdit1:Value )
lFound := .t.
ELSE
MsgInfo("No existe" )
lFound := .f.
ENDIF
RETURN lFound
Gracias anticipadas,
Manuel
Utilizando el siguiente método y suponiendo que el valor del campo sea "manuel" y en el oEdit1 tecleo "m", el resultado de la búsqueda sale verdadera.
¿Qué puedo hacer para que lFound sea .t. solo cuando los valores sean exactos.
Quote:
METHOD Edit1Exit( oSender, oNextCtl ) CLASS TForm1
local lFound
IF ::oDbfDataSet1:seek ( ::oEdit1:Value, .t. )
MsgInfo( "Encontrado " + ::oEdit1:Value )
lFound := .t.
ELSE
MsgInfo("No existe" )
lFound := .f.
ENDIF
RETURN lFound
Gracias anticipadas,
Manuel