Duda con la implementación de consulta a base de datos
¿Cómo puedo actualizar los campos, de manera que se reste o se sume, por ejemplo, si en la base de datos de una librería, en la tabla empleados, quiero que en el campo "libros vendidos" se le sume 1, y en la tabla libros, que al campo "cantidad" se le reste uno?
¿Tiene qué ser consulta de actualización?
Por ejemplo, la consulta me pregunta "Nombre del vendedor" y después de eso "Libro vendido" pero no logro que le sume 1 a los libros vendidos del vendedor y le reste uno a la cantidad de libros del libro vendido.
¿Tiene qué ser consulta de actualización?
Por ejemplo, la consulta me pregunta "Nombre del vendedor" y después de eso "Libro vendido" pero no logro que le sume 1 a los libros vendidos del vendedor y le reste uno a la cantidad de libros del libro vendido.
1 Respuesta
Respuesta de areal76
1
Defino campos de tabla libros
Idlibro integer
NOMBRE STRING
VENDIDOS DOUBLE
el codigo es:
vIdLibro = 27
valor = 1
DoCmd.RunSQL "update libros set vendidos = vendidos + " & valor & " where idlibro =" & vIdLibro
Si el valor q se actualiza es Texto el codigo es asi:
valor = "nuevo nombre o nombre modificado"
vId = 27
DoCmd.RunSQL ("update libros set nombre = '" & valor & "' where id = " & vId)
El valor de las variables vIdLibro y valor pueden ser modificadas por el usuario en tiempo de ejecución agregándoles el valor de un par de textbox así
vIdLibro = me.txtCodigolibro.value
valor = me.txtcantvendida.value
El código para actualizar la otra tabla es igual solo tienes que cambiar un par de signos y nombre de una forma muy lógica...
Idlibro integer
NOMBRE STRING
VENDIDOS DOUBLE
el codigo es:
vIdLibro = 27
valor = 1
DoCmd.RunSQL "update libros set vendidos = vendidos + " & valor & " where idlibro =" & vIdLibro
Si el valor q se actualiza es Texto el codigo es asi:
valor = "nuevo nombre o nombre modificado"
vId = 27
DoCmd.RunSQL ("update libros set nombre = '" & valor & "' where id = " & vId)
El valor de las variables vIdLibro y valor pueden ser modificadas por el usuario en tiempo de ejecución agregándoles el valor de un par de textbox así
vIdLibro = me.txtCodigolibro.value
valor = me.txtcantvendida.value
El código para actualizar la otra tabla es igual solo tienes que cambiar un par de signos y nombre de una forma muy lógica...
