** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - Actualizar datos en tabla, tras realizar consulta
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoActualizar datos en tabla, tras realizar consulta

 Responder Responder
Autor
Mensaje
Antonio Pedro Ver desplegable
Asiduo
Asiduo


Unido: 13/Diciembre/2005
Estado: Sin conexión
Puntos: 308
Enlace directo a este mensaje Tema: Actualizar datos en tabla, tras realizar consulta
    Enviado: 01/Febrero/2023 a las 00:25
Un saludo, os escribo por si me podéis orientar-ayudar con el siguiente planteamiento:

Tengo 3 tablas, TblDatospersonales, TblExpedientes y TblVehiculos.

Tengo un formulario independiente en el cual voy dando de alta los datos personales (dni, nombre, apellidos, etc.), datos del expediente y datos del vehículo.

Cuando voy a realizar una nueva alta al introducir el dni, si este existe me muestra un mensaje y me inserta en el formulario  los datos correspondientes a ese dni (nombre, apellidos, direccion,etc).

Lo que pretendo es que, si deseo actualizar algún dato o si hay algún dato en blanco (Hijo de, dirección, Provincia, ciudad, etc), pues cambio el dato correspondiente en el formulario, para que se me actualice ese dato en la tabla, para lo cual tengo la siguiente instrucción:

CurrentDb.Execute "UPDATE TblDatospersonales SET Hijode = '" & Replace(Forms!FrmDatosPersonales!Hijode, "'", "''") & "',Direccion = '" & Replace(Forms!FrmDatosPersonales!Direccion, "'", "''") & "', " _

  & "Fnac = '" & Replace(Forms!FrmDatosPersonales!FNac, "'", "''") & "',Lunaci = '" & Replace(Forms!FrmDatosPersonales!Lunaci, "'", "''") & "', Pronaci = '" & Replace(Forms!FrmDatosPersonales!Pronaci, "'", "''") & "', " _

                    & "Localidad = '" & Replace(Forms!FrmDatosPersonales!Localidad, "'", "''") & "',Ciudad = '" & Replace(Forms!FrmDatosPersonales!Ciudad, "'", "''") & "', " _

                    & "Telefono1 = '" & Replace(Forms!FrmDatosPersonales!Telefono1, "'", "''") & "',Telefono = '" & Replace(Forms!FrmDatosPersonales!Telefono2, "'", "''") & "' " _

                    & "WHERE Dni = '" & Forms!FrmDatosPersonales!Dni & "'", dbFailOnError

A la hora de actualizarlo, me da error 3061 pocos parámetros.se esperaba 1. Por más que compruebo los campos por si hay algún error, nada, no doy con el posible error, o planteamiento.

Acudo por si me podéis ayudar a solucionar el problema o por si el contrario hay alguna otra solución.

Un Saludo. 

 


Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 08:28
Divide y vencerás. Vamos, el método benedictino de toda la vida LOL.

En vez de poner todas las modificaciones de una vez, empieza por poner una -Hijode- y una vez que te funcione pruebas a añadir la segunda, ...

Yo protegería los nulos que suelen dan muchos problemas.

UPDATE .... SET Hijode = '" & replace(nz(forms!...., ""), "'", """) & ....

Menudo lío de comillas, .... ¡ojo con ellas!


Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
lbauluz Ver desplegable
Administrador
Administrador
Avatar

Unido: 29/Marzo/2005
Localización: La Gloria
Estado: Sin conexión
Puntos: 3849
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 14:43
Si no  me equivoco, para concatenar el salto de línea no debes poner

"xxxx " _
& "YYYY"

Lo que debes poner es 

"xxxx " & _
"YYYY"
con un espacio entre & y _


Al menos en Excel es así.

Un saludo.

Luis
El Búho es un pajarraco
Arriba
xavi Ver desplegable
Administrador
Administrador
Avatar
Terrassa-BCN

Unido: 10/Mayo/2005
Localización: Catalunya ||||
Estado: Sin conexión
Puntos: 14720
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 16:04
Hola Luis,

Se puede concatenar líneas de ambas formas. De hecho, yo me he acostumbrado a concatenarlas con el & en la línea de abajo porque me resulta más visualmente reconocible.

Y funciona tanto en Access como en Excel.

Un saludo
Xavi, un minyó de Terrassa

Mi web
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 16:25
Lo que indica que es nueva línea es el símbolo _ , con el & lo que hacemos es concatenar cadenas.
Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
xavi Ver desplegable
Administrador
Administrador
Avatar
Terrassa-BCN

Unido: 10/Mayo/2005
Localización: Catalunya ||||
Estado: Sin conexión
Puntos: 14720
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 23:16
Matizo entonces mi respuesta.

Cuando se separa una línea de código entre dos líneas justamente en el punto dónde estamos concatenando cadenas, el & puede situarse antes del _ (en la línea superior) o al principio de la línea inferior.

Como decía, me he acostumbrado a utilizar esa segunda forma porque, al ver el & al principio de la línea, ya se que se trata de una línea que viene "de arriba".

¿Se entiende mejor así?

Un saludo
Xavi, un minyó de Terrassa

Mi web
Arriba
Mihura Ver desplegable
Administrador
Administrador
Avatar

Unido: 06/Mayo/2005
Localización: En la dehesa
Estado: Sin conexión
Puntos: 13990
Enlace directo a este mensaje Enviado: 01/Febrero/2023 a las 23:56
Zi zeñó .....  LOL

Lo que esta claro es que cada uno tiene sus propias manías ... yo lo hago así:

    SQL = " SELECT ContadorLinea_lalb, CodigoStock_lalb, Descripcion_lalb, Unidades_lalb, Precio_lalb, Total_lalb" & _
          " FROM ComprasAlbaranesLineas" & _
          " WHERE ContadorAlbaran_lalb = [ContadorAlbaran]" & _
          " ORDER BY ContadorLinea_lalb"


Jesús Mansilla Castells.
Saludos desde Móstoles.

Access Aplicaciones
Tecsys.es
Arriba
Antonio Pedro Ver desplegable
Asiduo
Asiduo


Unido: 13/Diciembre/2005
Estado: Sin conexión
Puntos: 308
Enlace directo a este mensaje Enviado: 04/Febrero/2023 a las 20:24
Gracias a todos por contestar, al final seguí la sugerencia de Mihura y me soluciono el problema. Nuevamente Gracias, se puede cerrar el hilo.
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable