Iniciar sesión
 
InicioBibliotecaAprendizajeDescargaSoporteComunidadForos
Recursos para Profesionales de TI >
> 
> 
> 
Codigo en Microsoft Access 2010

Answered Codigo en Microsoft Access 2010

  • jueves, 26 de enero de 2012 14:48
     
     
    Inicie sesión para votar
    0

    como hago para que cuando ingrese un codigo o un id en un formulario, aparezca en pantalla el registro deseado si existe.

     

Todas las respuestas

  • jueves, 26 de enero de 2012 18:06
     
     Respondida
    Inicie sesión para votar
    1
    Hola!
    puedes en el evento al actualizar del primer cuadro de texto, mediante Dlookup, aplicar el resultado al segundo cuadro de texto.

    Private Sub txtCodigo_AfterUpdate()
    Me.txtNombre = DLookup("NombreCompañía", "Clientes", "IDCliente = '" & Me.txtCodigo & "'")
    End Sub
    Saludos a todos desde Huelva
    http://www.mvp-access.es/emilio/
     
  • viernes, 27 de enero de 2012 9:02
     
     Respondida Tiene código
    Inicie sesión para votar
    1

    Hola

    No tengo ahora un Access 2010 a mano, pero imagino que no habrá mucha diferencia (en esto) con versiones anteriores.

    Te pongo un ejemplo con la base de Northwind de 2003. En el formulario de clientes, introduzco un cuadro de texto no vinculado a ningún campo. Este código te permite localizar los registros de cliente mediante su ID

    Private Sub txtIDBuscar_AfterUpdate()
    ' Buscar el registro que coincida con el control.
    Dim RS As Object
    Set RS = Me.Recordset.Clone
    RS.FindFirst "[IdCliente] = '" & Me.txtBuscar.Value & "'"
    If Not RS.EOF Then Me.Bookmark = RS.Bookmark
End Sub

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