Adición de registros
Bien he creado un formulario y quiero adicionar registros mediante un botón y que graven en mi tabla, que es lo que debo escribir en le botón que dice adicionar para que no me solape el mismo registro
Respuesta de scorpioandru
0
0
scorpioandru, execl, acces, word, windows xp, windows nt y mantenimiento en...
Bueno primero que todo tienes que fijarte si estas trabajando sobre un proyecto o una base de datos
si es así tienes que escribir unos códigos en el procedimiento load del formulario
appen database ( nombre de la base de datos)
Luego poner en uso la tabala
Use ( el nombre exacto de la tabbla)
Y el indice principal de la tabla
set order to ( nombre del campo que tiene que ser principal en la tabla )
Si no estas trabajando encima de una base de datos solo pon en uso la tabala y el campo y listo
dibujas la caja de texto donde vas a ingresar el registro
y dibujas el botón con el cual vas a guardar los registros ingresados
y escribes
thisform.(La caja de texto que vas a utilizar). Value= (el campo de la tabla donde quieres que se guarde el registro )
si es así tienes que escribir unos códigos en el procedimiento load del formulario
appen database ( nombre de la base de datos)
Luego poner en uso la tabala
Use ( el nombre exacto de la tabbla)
Y el indice principal de la tabla
set order to ( nombre del campo que tiene que ser principal en la tabla )
Si no estas trabajando encima de una base de datos solo pon en uso la tabala y el campo y listo
dibujas la caja de texto donde vas a ingresar el registro
y dibujas el botón con el cual vas a guardar los registros ingresados
y escribes
thisform.(La caja de texto que vas a utilizar). Value= (el campo de la tabla donde quieres que se guarde el registro )
Hola gracias por tu respuesta pero:
Primero he creado un proyecto con varios botones y text bien por otro lado también he creado una tabla con los campos que están en en el formulario lo que hice es hacer un botton que grave los datos y otro botón que adicione estos funcionan pero solopa al mismo registro de la tabla no me deja adicionar otro registro AYUDAME
Primero he creado un proyecto con varios botones y text bien por otro lado también he creado una tabla con los campos que están en en el formulario lo que hice es hacer un botton que grave los datos y otro botón que adicione estos funcionan pero solopa al mismo registro de la tabla no me deja adicionar otro registro AYUDAME
¿Cuándo ejecutas y presionas esos botones te ejecuta error o no te sale nada
que es solapar? Explicate mejor
que es solapar? Explicate mejor
Lo quiero decir es que cuando presiono grabar graba pero cuando le digo adicioonar otro registro sobreescribe sobre el primero y nunca adicona más solo reescribe sobre el primero
Gracias
Gracias
Ha ya entiendo lo que debes hacer es en el botón adicionar
thisform.(La caja de texto donde quieres guardar debes escribir el nombre bien escrito). value=" "
El espacio entre las comillas es muy importante si el campo es carácter si el campo es numérico solo pones un cero
y debajo de eso
escribes
appen blank
thisform. Refresh
prueba y me dices
ojala te sirva
thisform.(La caja de texto donde quieres guardar debes escribir el nombre bien escrito). value=" "
El espacio entre las comillas es muy importante si el campo es carácter si el campo es numérico solo pones un cero
y debajo de eso
escribes
appen blank
thisform. Refresh
prueba y me dices
ojala te sirva
¿Hola gracias pero lamentablemente sigue haciendo lo mismo pro ejemplo tendo en mi tabla nombre y apellido graba el registro primero digamo A y B luego adicionamos otro y desaparece A y B y escribe C y D
osea sobreescribe porque?
osea sobreescribe porque?
El código que estas utilizando al guardar no te crea un espacio en blanco en la tabla el código appen blank y gather menvar
en el botón adicionar abres un espacio en blanco y en el guardar guardas en ese espacio
intenta con gather menvar en el botón guardar
si no te sirve te puedo dar otra forma que es muy extensa pero sirve
en el botón adicionar abres un espacio en blanco y en el guardar guardas en ese espacio
intenta con gather menvar en el botón guardar
si no te sirve te puedo dar otra forma que es muy extensa pero sirve
Mira no funciona lo que creo es que se debe usa el comando do whilw do pero no se como es decir mientras no sea fin de archivo que adicione
Pero no se en que bioton ubicarlo ayudame gracias
Pero no se en que bioton ubicarlo ayudame gracias
procedimiento load en el formulario
public yy
* se define una variable publica para manejarla y controlar los errores al grabar
store 0 to yy
*la variable se define de tipo numero
close tables all
*cerrar todas las tablas en caso de que haya una en uso
open database (la base de datos donde estas trabajando)
*abre y direcciona la base de datos
set multilocks on
*hace un bloqueo de tipo multiple
use (la tabla donde vas a guardar)
*abre la tabla que se va a trabajar
set order to (el campo donde vas a guardar)
*activa le indice de la tabla
=cursorsetprop("buffering",5,"(nombre de la tabla donde estas trabajando")
*crea el tipo de almacenamiento para la tabla
boton adicionar
thisform.(lacaja de texto que vas a utilizar).value=" "
APPEN blank
thisform.refresh
boton guardar procedimiento clik
op=messagebox("desea grabar el registro",4,"grabar")
IF op=6
=tableupdate(.t.)
SEEK(campo donde vas a guardar en la tabla)
IF yy=1
=tablerevert(.t.)
yy=0
ELSE
MESSAGEBOX("registro grabado")
ENDIF
ELSE
=tablerevert(.t.)
Endif
Thisform. Refresh
Botón grabar procedimiento error
yy=1
Messagebox("ya existe se nombre", 0,"verificar registro")
Botón verificar procedimiento clic
Brow noedit noappen
Las partes donde están lo paréntesis cambialas por tus datos
menos los que dicen "messagebox"
Si no te funciona es mejor que enpezemos desde el principio por que ya es algo de el inicio
public yy
* se define una variable publica para manejarla y controlar los errores al grabar
store 0 to yy
*la variable se define de tipo numero
close tables all
*cerrar todas las tablas en caso de que haya una en uso
open database (la base de datos donde estas trabajando)
*abre y direcciona la base de datos
set multilocks on
*hace un bloqueo de tipo multiple
use (la tabla donde vas a guardar)
*abre la tabla que se va a trabajar
set order to (el campo donde vas a guardar)
*activa le indice de la tabla
=cursorsetprop("buffering",5,"(nombre de la tabla donde estas trabajando")
*crea el tipo de almacenamiento para la tabla
boton adicionar
thisform.(lacaja de texto que vas a utilizar).value=" "
APPEN blank
thisform.refresh
boton guardar procedimiento clik
op=messagebox("desea grabar el registro",4,"grabar")
IF op=6
=tableupdate(.t.)
SEEK(campo donde vas a guardar en la tabla)
IF yy=1
=tablerevert(.t.)
yy=0
ELSE
MESSAGEBOX("registro grabado")
ENDIF
ELSE
=tablerevert(.t.)
Endif
Thisform. Refresh
Botón grabar procedimiento error
yy=1
Messagebox("ya existe se nombre", 0,"verificar registro")
Botón verificar procedimiento clic
Brow noedit noappen
Las partes donde están lo paréntesis cambialas por tus datos
menos los que dicen "messagebox"
Si no te funciona es mejor que enpezemos desde el principio por que ya es algo de el inicio
Gracias
¿Pero te cuento no funciona sigo con el mismo problema
no sera que hay que recorrer toda la tabla libre que uso?
Esperare tu respuesrta
¿Pero te cuento no funciona sigo con el mismo problema
no sera que hay que recorrer toda la tabla libre que uso?
Esperare tu respuesrta
¿Hola te puedo mandar mi formulario para que puedas ver donde esta la falla? Si es así, aque dirección
Gracias
Gracias
Hola y una pregunta más como puedo hacer ejecutar mi proyecto paso a pasado para ver donde esta el error
[email protected]
Envíamelo a esta dirección
Envíamelo a esta dirección
- Compartir respuesta
- Anónimo
ahora mismo