boton insertar

victor
13 de Enero del 2005
solo tengo 17 años como estoy empasando en esto de la programacion bien debe saber que mis conocimientos son minimos, es por ender que necisito que me diga el codigo para insertar datos desde un formulario a una tabla por ejemplo los datos personales de un alumno a una tabla alumno mas o meno lo hice asi nose :

cedulav=space(8)
nombrev=space(15)
apellidov=space(15)

select alumno
order to ci
cedulav=alltring(thisform.cedula_tex.tex)
seek cedulav
if found()
messagebox("el alumno no puede ser insertado, ya existe)
append blank
else
replace alumno.ci with cedulav
replace alumno.nombre with nombrev
endif
pero no me inserta los datos que cree ustec

le agradesco su colaboraciòn

petter
13 de Enero del 2005
Fijate donde esta el append blank, asi debe funcionar

cedulav=space(8)
nombrev=space(15)
apellidov=space(15)

select alumno
order to ci
cedulav=alltring(thisform.cedula_tex.tex)
seek cedulav
if found()
messagebox("el alumno no puede ser insertado, ya existe)
else
append blank
replace alumno.ci with cedulav
replace alumno.nombre with nombrev
endif

RICARDO
13 de Enero del 2005
solo tengo 17 años como estoy empasando en esto de la programacion bien debe saber que mis conocimientos son minimos, es por ender que necisito que me diga el codigo para insertar datos desde un formulario a una tabla por ejemplo los datos personales de un alumno a una tabla alumno mas o meno lo hice asi nose :

cedulav=space(8)
nombrev=space(15)
apellidov=space(15)

select alumno
order to ci
cedulav=alltring(thisform.cedula_tex.tex)
seek cedulav
if found()
messagebox("el alumno no puede ser insertado, ya existe)
else
appen blank
replace alumno.ci with cedulav
replace alumno.nombre with nombrev
endif
pero no me inserta los datos que cree ustec

le agradesco su colaboraciòn