Formularios...como cargar la data
vperezr
21 de Octubre del 2008
Amigos...me gusta la programacion, pero mas me gusta la simbolica que la "template" o automatica. Es decir, hacer formularios automaticos no es de mi agrado, me gusta tener mas control pero no encuentro la informacion que necesito saber.
El asunto es el siguiente, tengo un formulario en el cual cree todos los campos LABEL y TEXTBOX. Abro la base de datos , escojo el index, y busco un Campo especifico, ejemplo SCODIGO.
Tengo este TEXTBOX nombrado com SCODIGO en el formulario a fin de que el programa sepa a que campo me refiero. HAsta aquà todo correcto.
Creo un boton llamado "BUCAR" y en CLICK pongo un procedimiento para el cual lea la info del campo Scodigo y lo busque en la base de datos.
Si no encuentra el scodigo, me da un mensaje "Codigo no existe" ...si entro scodigo en blanco me dice "no puede dejarlo en blanco". Si encuentra el scodigo correcto, entonces el sistema , debe mostrarme todos los otros campos con sus valores respectivos.
He llamado a los otros campos por diferentes nombres a los que usa la BASE DE DATOS, ejemplo, Snombres en lugar de nombres, Sapellidos, en lugar de apellidos, etc.
Le digo al programa que reemplace
El asunto es el siguiente, tengo un formulario en el cual cree todos los campos LABEL y TEXTBOX. Abro la base de datos , escojo el index, y busco un Campo especifico, ejemplo SCODIGO.
Tengo este TEXTBOX nombrado com SCODIGO en el formulario a fin de que el programa sepa a que campo me refiero. HAsta aquà todo correcto.
Creo un boton llamado "BUCAR" y en CLICK pongo un procedimiento para el cual lea la info del campo Scodigo y lo busque en la base de datos.
Si no encuentra el scodigo, me da un mensaje "Codigo no existe" ...si entro scodigo en blanco me dice "no puede dejarlo en blanco". Si encuentra el scodigo correcto, entonces el sistema , debe mostrarme todos los otros campos con sus valores respectivos.
He llamado a los otros campos por diferentes nombres a los que usa la BASE DE DATOS, ejemplo, Snombres en lugar de nombres, Sapellidos, en lugar de apellidos, etc.
Le digo al programa que reemplace
dquinn
21 de Octubre del 2008
Aunque falta un poco mas de explicación, todo parece que te falta indicar el "ControlSource" de los campos. Por ejemplo: THISFORM.Scodigo.CONTROLSOURCE="m.codigo" ; donde deberÃas declarar "m.codigo" como variable local o pública. Si ligas el campo a la tabla entonces el control source serÃa el nombre del campo: "nombretabla.codigo"
Entonces tu busqueda seria algo asi:
LOCATE FOR codigo=m.codigo
IF FOUND()
SCATTER MEMVAR
ELSE
WAIT WINDOW "Nombre no existe"
SCATTER MEMVAR BLANK
ENDIF
Recuerde que el nombre del campo es una referencia pero que este no lo liga a ninguna tabla . Debes ligarlo al campo de la tabla mediante una variable o directamente usando al propiedad CONTROLSOURCE.
DQ
Pura Vida
Entonces tu busqueda seria algo asi:
LOCATE FOR codigo=m.codigo
IF FOUND()
SCATTER MEMVAR
ELSE
WAIT WINDOW "Nombre no existe"
SCATTER MEMVAR BLANK
ENDIF
Recuerde que el nombre del campo es una referencia pero que este no lo liga a ninguna tabla . Debes ligarlo al campo de la tabla mediante una variable o directamente usando al propiedad CONTROLSOURCE.
DQ
Pura Vida
vperezr
21 de Octubre del 2008
Gracias...Todo resuelto.
En realidad ya tenia el control source puesto desde el diseñador / propiedades del TEXTBOX ...
No sé que hacia mal pero los datos se quedaban en memoria...ahora si los pasa al formulario.
TEngo muchas mas preguntas pero trataré de resolverlas por mi cuenta y luego si no puedo, te contacto.
Saludos,
En realidad ya tenia el control source puesto desde el diseñador / propiedades del TEXTBOX ...
No sé que hacia mal pero los datos se quedaban en memoria...ahora si los pasa al formulario.
TEngo muchas mas preguntas pero trataré de resolverlas por mi cuenta y luego si no puedo, te contacto.
Saludos,