
ayudeme a encontrar solucion a mi formulario
Publicado por Elder Lenin (6 intervenciones) el 07/10/2014 03:15:56
amigos tengo una base de datos en un formulario. tambien en mi formulario tengo 9 option group. y 24. check box. pero niguno me funciona al guardar ni modificar. ejemplo. temgo un option group. masculino y femenino. seleciono masculino y aparece femenino. mi tabla la nombre. zona 1. tambien tengo un campo llamado familia. que es donde.. select zona 1.
no se si hay errores. por eso lo mando. para que me ayuden a corregirlo
estoy trabajamdo con visual foxpro 9.
En el boton de guardar lo tengo de esta manera.
nota: los nombres apadrinado y no_apadrinado son campos de la tabla que representan a los optiongroup. y hermanos y padres son campos de la tabla que representa los check.
esto es el boton guardar. estara bueno genios.
vamos con boton de modificar:
esta de esta forma.
espero sus respuestas pronto bendixiones hermanos
1
2
3
4
5
6
7
set order to familia
if seek (thisform.txtfamilia.value)
messagebox("codigo repetido")
thisform.optiongroup1.option1.value=.t.
thisform.optiongroup1.option2.value=.f.
thisform.check1.value=.f.
thisform.chech2.value=.f.
no se si hay errores. por eso lo mando. para que me ayuden a corregirlo
estoy trabajamdo con visual foxpro 9.
En el boton de guardar lo tengo de esta manera.
1
2
3
4
5
6
7
8
9
10
select zona1
append blank
replace familia with thisform.txtfamilia.value
replace apadrinado with thisform.optiongroup1.option1.value
replace no_apadrinado with thisform.optiongroup1.option2.value
replace hermanos with thisform.check1.value
replace padres with thisform.check2.value.
thisform.refresh ()
thisform.txtfamilia.init
thisform.txtfamilia.losfocus
nota: los nombres apadrinado y no_apadrinado son campos de la tabla que representan a los optiongroup. y hermanos y padres son campos de la tabla que representa los check.
esto es el boton guardar. estara bueno genios.
vamos con boton de modificar:
esta de esta forma.
1
2
3
4
5
6
select zona1
replace familia with thisform.txtfamilia.value
replace apadrinado with thisform.optiongroup1.option1.value
replace no_apadrinado with thisform.optiongroup1.option2.value
replace hermanos with thisform.check1.value
replace padres with thisform.check2.value
espero sus respuestas pronto bendixiones hermanos
Valora esta pregunta


0