Update de registro en access

Hola que tal, mi consulta es la siguiente, tengo una aplicación hecha en access para la cual hice 3 formularios uno seria por el cual arranco y exploro los registros llamado "ficha", el cual tiene 2 botones que conducen a otros 2 formularios uno es para la alta de registros que anda perfecto y el otro para la modificación de registro (llamado "modificacion"), el tema es que cuando apretó desde el formulario principal el botón modificar registro, me abre el formulario "modificacion" posicionado en el primer registro de la base de datos y yo en realidad quiero que me aparezca el registro que elegí o que estoy parado en el formulario "ficha". Y probé de varias maneras y no puedo enganchar la manera correcta. Te paso el código del formulario "modificacion":
Private Sub Form_Open(Cancel As Integer)
    campo_id_juicio = Form_ficha.id_juicio
    campo_dependencia = Form_ficha.dependencia
    campo_titular = Form_ficha.titular
    campo_fecha = Form_ficha.fecha
    campo_hora = Form_ficha.hora
    campo_au_tran = Form_ficha.au_tran
    campo_ipp_tran = Form_ficha.ipp_tran
    campo_au_ley13943 = Form_ficha.au_ley13943
    campo_ipp_ley13943 = Form_ficha.ipp_ley13943
End Sub
Private Sub actualiza_registro_Click()
On Error GoTo Err_actualiza_registro_Click
        If campo_dependencia <> "" And campo_titular <> "" And campo_fecha <> "" _
           And campo_hora <> "" And campo_au_tran <> "" And campo_ipp_tran <> "" _
           And campo_au_ley13943 <> "" And campo_ipp_ley13943 <> "" Then
                dependencia = campo_dependencia
                titular = campo_titular
                fecha = campo_fecha
                hora = campo_hora
                au_tran = campo_au_tran
                ipp_tran = campo_ipp_tran
                au_ley13943 = campo_au_ley13943
                ipp_ley13943 = campo_ipp_ley13943
                MsgBox "au_ley13943: " & au_ley13943, vbInformation, "Cartel"
                MsgBox "GRABO!!", , "Cartel"
            DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70
        Else
                MsgBox "Debe completar TODOS los campos", , "ATENCION...!"
        End If
Exit_actualiza_registro_Click:
    Exit Sub
Err_actualiza_registro_Click:
    MsgBox Err.Description
    Resume Exit_actualiza_registro_Click
End Sub
Y acá te paso el código del botón del formulario "ficha" que apretó para abrir el formulario "modificacion"
Private Sub va_hacia_modificacion_Click()
On Error GoTo Err_va_hacia_modificacion_Click
    DoCmd.OpenForm "modificacion"
Exit_va_hacia_modificacion_Click:
    Exit Sub
Err_va_hacia_modificacion_Click:
    MsgBox Err.Description
    Resume Exit_va_hacia_modificacion_Click
End Sub
Muchas gracias !

1 Respuesta

Respuesta
Tu problema es porque loe estás hacienmdo con el binding de access, debes hacer un formulario para la atualizacion que no tenga los controles con binding porque siempre que abras se posiciona en el primer registro que es lo que te pasa.
Has un formulario y lo llenas a mano y lo actualizas a mano usando ADO
¿OK, pero que?, ¿Acaso no existe la posibilidad de ubicarme en el registro que yo quiero?, ¿Osea enviarle ese dato de un formulario a otro y posicionarme en ese registro?...
No tengo idea, lo tuyo es access no visual basic, lo siento

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas