Problema con rutina

08/04/2005 - 16:19 por Carlos Sanchez | Informe spam
buenos dias, tengo que hacer una rutinapara modificar unos campos de una
tabla y al final mostrar un mensaje con los campos que se modificaron

mas o menos es asi
do case
case thisform.text_name!=tabla.name
replace tabla.name with thisform.text_name
cCheck= ' Nombre'
case thisform.text_apellido!=tabla.apellido
replace tabla.name with thisform.text_apellido
cCheck= ' apellido'+cCheck
endcase
if cCheck!='' then
messagebox(cCheck)
else
mesagebox('no hay cambios')
endif
Cuando modifico uno y otro funciona el problema es cuando modifico los dos
solo se modifica el primero. Hay alguna otra forma (tomando en cuenta que
son 12 datos a introducir).

SALUDOS
 

Leer las respuestas

#1 Heberto Villavicencio
08/04/2005 - 16:48 | Informe spam
El case solamente va a ejecutar una condicion, es decir cuando una condicion
se cumple las demas no se evaluan. Si tienes el caso que se puede ejecutar
mas de una condicion simultaneamente deberas utilizar otra instruccion.
(IF...ELSE..ENDIF)



"Carlos Sanchez" escribió en el mensaje
news:
buenos dias, tengo que hacer una rutinapara modificar unos campos de una
tabla y al final mostrar un mensaje con los campos que se modificaron

mas o menos es asi
do case
case thisform.text_name!=tabla.name
replace tabla.name with thisform.text_name
cCheck= ' Nombre'
case thisform.text_apellido!=tabla.apellido
replace tabla.name with thisform.text_apellido
cCheck= ' apellido'+cCheck
endcase
if cCheck!='' then
messagebox(cCheck)
else
mesagebox('no hay cambios')
endif
Cuando modifico uno y otro funciona el problema es cuando modifico los dos
solo se modifica el primero. Hay alguna otra forma (tomando en cuenta que
son 12 datos a introducir).

SALUDOS


Preguntas similares