Guardar datos en un formulario independiente

29/10/2012 - 10:22 por Toni | Informe spam
Buenos dias,

Tengo un formulario independiente con un menu desplegable que lee el ID de los registros de una tabla. Mi intención es que, en un evento AfterUpdate, el formulario se cargue con todos los datos del registro escogido en el menu desplegable.

Como debo hacerlo? Muchas gracias!
Toni
 

Leer las respuestas

#1 José Mª Fueyo
29/10/2012 - 10:56 | Informe spam
Hola
Puedes generar un script sql con los datos de los controles

<pego>
On Error GoTo mierror
Dim sSQL As String
sSQL = "INSERT INTO tblPruebas(Nombre, Apellidos) " & _
"VALUES ('" & Me.txtNombre.Value & "','" & Me.txtApellidos.Value & "');"
'Desactivo las advertencias momentaneamente
DoCmd.SetWarnings False
DoCmd.RunSQL sSQL
DoCmd.SetWarnings True
'Limpio los cuadros de texto
Me.txtNombre.Value = ""
Me.txtApellidos.Value = ""
Call MsgBox("Registro insertado correctamente", vbInformation, "Inserción terminada")
Exit Sub
mierror:
Dim sError As String
sError = "Se ha producido un error al insertar el registro:" & _
" Número: " & Err.Number & _
" Descripción: " & Err.Description
Call MsgBox(sError, vbCritical, "Error al insertar el registro")
</pego>

Salu2,
José Mª Fueyo
[MS MVP Access]

Preguntas similares