ayuda para validar campos en foxpro
Publicado por gerardo escobar (1 intervención) el 28/06/2013 16:50:27
Buenos días a toda la comunidad, tengo el siguiente problema tengo un micro sistema que su única función es consultar los códigos de barras de los productos, pero me presenta unos problemas, sin haber escrito nada en el campo de texto y se da click en buscar hace una busqueda pero sale una hoja en blanco (es obvio porque no se introdujo ningun caracter en el campo de texto), y cuando se introduce un numero al azar tambien hace una busqueda, lo que quiero es que me de un error a la hora de introducir un valor incorrecto y tambien que me arroje un error si tiene el campo de texto vacio.
Espero me puedan ayudar muchas gracias de antemano acá les dejo el codigo del micro sistema:
LOCAL lcConnString, h, n
lcConnString = ;
[DRIVER=SQL Server;] + ;
[DATABASE=bd_spdv;] + ;
[UID=sa;] + ;
[PWD=123;] + ;
[APP=APLICACION;] + ;
[server=gerardo-9e80c6e]
h = SQLSTRINGCONNECT (m.lcConnstring)
n= SQLEXEC(h, "select* from movtomafisica1", 'qmov')
SELECT * from qmov WHERE CodigoBarra =thisform.text1.Value
Espero me puedan ayudar muchas gracias de antemano acá les dejo el codigo del micro sistema:
LOCAL lcConnString, h, n
lcConnString = ;
[DRIVER=SQL Server;] + ;
[DATABASE=bd_spdv;] + ;
[UID=sa;] + ;
[PWD=123;] + ;
[APP=APLICACION;] + ;
[server=gerardo-9e80c6e]
h = SQLSTRINGCONNECT (m.lcConnstring)
n= SQLEXEC(h, "select* from movtomafisica1", 'qmov')
SELECT * from qmov WHERE CodigoBarra =thisform.text1.Value
Valora esta pregunta


0