La Web del Programador: Comunidad de Programadores
https://www.lawebdelprogramador.com/foros/Access/786657-Guardar-palabra-en-un-campo.html

Guardar palabra en un campo

Guardar palabra en un campo

Publicado por switch.2h (13 intervenciones) el 11/04/2007 23:10:27
Holas a tod@s
tengo la siguente duda, ojala que alguen me pueda ayudar.
tengo un campo llamado "comentario" de la tabla "rapido1" y en este campo quiero grabar los datos de la variable aux, no se por que no me resulta, este es el codigo que tengo

Dim tabla1 As Recordset
Dim pConsulta1 As QueryDef
dim aux as string

aux = CUALQUER COSA

Set tabla1 = CurrentDb.OpenRecordset("rapido1")

With tabla1
.MoveFirst


stUpd1 = "INSERT INTO rapido1 (comentario) VALUES('aux');"
Set pConsulta1 = CurrentDb.CreateQueryDef("", stUpd1)


pConsulta1.Execute
pConsulta1.Close

End With

End Sub

ojala que alguen me pueda ayudar

de ante mano GRACIAS!!!!!!!!!!!!!!1
Imágen de perfil de Alejandro

Insertar valor de variable en campo de comentario

Publicado por Alejandro (4142 intervenciones) el 08/08/2023 20:19:31
Para insertar el valor de la variable `aux` en el campo "comentario" de la tabla "rapido1", necesitas ajustar tu código VBA de la siguiente manera:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
Dim tabla1 As Recordset
Dim pConsulta1 As QueryDef
Dim aux As String
 
aux = "CUALQUIER COSA"
 
Set tabla1 = CurrentDb.OpenRecordset("rapido1")
 
With tabla1
    .AddNew
    !comentario = aux
    .Update
    .Close
End With

Este código abre el recordset, agrega un nuevo registro, asigna el valor de la variable `aux` al campo "comentario" y luego actualiza el recordset. No necesitas crear una consulta SQL separada para este propósito.

Recuerda reemplazar `"CUALQUIER COSA"` con el valor real que deseas almacenar en el campo "comentario".

Nota: Asegúrate de que la estructura y los nombres de campo sean correctos en tu tabla "rapido1" para que este código funcione adecuadamente.