Búsqueda de datos con inputbox
Hola buen día estoy queriendo hacer una búsqueda con inputbox, desde un botón de comando tengo el siguiente código:
a=INPUTBOX("Ingresa un valor: 2012999999, 2012=Año actual y 999999=Nro de Registro","Búsqueda",'')
SELECT mitabla
set orde to tag indice
IF campo1+campo2= VAL(a)
thisform.busca
ELSE
MESSAGEBOX("Registro no encontrado")
ENDIF
Me bota el mensaje de Registro no encontrado, a pesar que en la tabla existe el registro. El campo1 y campo2 son numéricos y almecenan el año y numero de reg. Gracias antemano.
1 respuesta
Sí, lo que pasa es para realizar búsquedas en tablas, debes hacerlo con un SEEK (si usas índice) o con un LOCATE (si no usas índice).
Pensando que tu índice (llamado "indice") tuviera la expresión "campo1+campo2". Podrías usar algo como:
IF SEEK(VAL(a), "mitabla")
thisform.busca
ELSE
MESSAGEBOX("Registro no encontrado")
ENDIF
Si no quieres usar índice:
LOCATE FOR campo1 + campo2 == VAL(a)
IF FOUND()
thisform.busca
ELSE
MESSAGEBOX("Registro no encontrado")
ENDIF
