Access - mostrar datos de una tabla en referencia a otra.

Pos: 44

Val: 53

mostrar datos de una tabla en referencia a otra.

Publicado por Adrian (32 intervenciones) el 15/09/2017 23:35:01

Buenas! Les comento lo que deseo hacer.
Pues tengo varias tablas: Casa, Inquilino, Garantes, etc
y tengo otra tabla Contratos en donde tengo puesto en cada columnas los id de cada inquilino para no andar completando con los mismos datos.
Ahora lo que quiero hacer es un formulario en donde se visualicen los datos del contrato.
Me gustaría que en vez de los id aparezcan los datos a los que hace referencia cada id.
Por ejemplo en Id_Casa que aparezca al lado el domicilio que esta guardado precisamente en la tabla Casa
y en inquilino el nombre y apellido y asi consecuentemente.
Podras darme una ayudita??

Valora esta pregunta

Me gusta: Está pregunta es útil y esta clara

No me gusta: Está pregunta no esta clara o no es útil

Responder

Pos: 4

Val: 529

mostrar datos de una tabla en referencia a otra.

Publicado por Neckkito (1157 intervenciones) el 16/09/2017 19:36:26

Hola!

Mira si puedes aplicar la sistemática de este ejemplo. Está explicado paso a paso: http://bit.ly/2afvpcE

Un saludo,

Neckkito
Access MVP

Valora esta respuesta

Me gusta: Está respuesta es útil y esta clara

No me gusta: Está respuesta no esta clara o no es útil

Comentar

Pos: 12

Val: 198

mostrar datos de una tabla en referencia a otra.

Publicado por Oscar Pérez (80 intervenciones) el 18/09/2017 13:19:45

Buenas!

Como muy bien indica Neckkito "everything is possible with dlookup" XD

Puedes buscar cualquier campo de cualquier tabla con cualquier valor en todo momento.

Incluso me monté un código para hacer un dlookup de cualquier base de datos pasándola como parámetro, utilizando ADO

Public Function DLookup2(RutaBBDD as String, Campo As String, Tabla As String, Optional Criterio As String)

Dim SQL As String

Set cnn = CreateObject("ADODB.Connection")

Set rs = CreateObject("ADODB.Recordset")

cnn.ConnectionString = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & RutaBBDD & ";Persist Security Info=False;"

cnn.Open

SQL = "SELECT TOP 1 " & Campo & " FROM " & Tabla

If Not IsMissing(Criterio) Then SQL = SQL & " WHERE " & Criterio

Set rs = cnn.Execute(SQL)

If Not rs.EOF Then DLookup2 = rs(0)

rs.Close

Set rs = Nothing

cnn.Close

Set cnn = Nothing

Exit Function

Por cierto, Neckkito, he de darte las gracias por tus manuales y ejemplos ya que me han hecho la vida mucho más fácil cuando empezaba a programar... :)

Saludos!
Óscar.

Valora esta respuesta

Comentar

Pos: 4

Val: 529

mostrar datos de una tabla en referencia a otra.

Publicado por Neckkito (1157 intervenciones) el 18/09/2017 13:28:58

Hola, Óscar:

Me alegro de que mis "cosillas" te hayan servido. Muchas gracias por tus amables palabras.

Simplemente comentarte como curiosidad que, en base a los últimos comentarios del equipo de Access en Microsoft, consideran que la tecnología ADO, al menos en Access, es tecnología obsoleta. Anecdóticamente, el futuro es DAO.

Eso lo puedes comprobar en este vídeo (en inglés), donde Michal Bar, hacia el final del vídeo, lo comenta

Un abrazo,

Neckkito
Access MVP

Valora esta respuesta

Comentar

Clave Principal con más de diez campos

interacción del usuario con la base de datos