Access - consultar una tabla y presentar en etiquetas

 
Vista:

consultar una tabla y presentar en etiquetas

tengo un programa en access pero quiero que un formulario ademas de guardar informacion me muestre los datos de otra tabla la cual tiene unos datos constantes sobre los cuales uno se apoya para ingresar los nuevos. Los resultados de la busqueda quiero que me aparescan en etiquetas para que no se puedan modificar...
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Enrique ramírez
Val: 37
Ha aumentado su posición en 2 puestos en Access (en relación al último mes)
Gráfica de Access

consultar una tabla y presentar en etiquetas

Publicado por Enrique ramírez (629 intervenciones) el 05/01/2012 22:02:17
me.etiqueta1.caption = campo1_deTabla
me.etiqueta2.caption = campo2_deTabla

o puedes almacenarlas en cajas de texto solo pon la propiedad bloqueado en si y de esta forma no se modifica el contenido.
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

consultar una tabla y presentar en etiquetas

Publicado por Chriis (8 intervenciones) el 06/01/2012 17:12:10
pero como le hago para llamar a la otra tabla...y para buscar el registro q ocupo...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Enrique ramírez
Val: 37
Ha aumentado su posición en 2 puestos en Access (en relación al último mes)
Gráfica de Access

consultar una tabla y presentar en etiquetas

Publicado por Enrique ramírez (629 intervenciones) el 09/01/2012 15:50:05
1) Utilizando la funcion Dlookup()

Dim var2 as Integer
Var2 = Nz(DLookup("[id]", "Tabla1", "[id] = " & Me.texto_id & ""))
me.etiqueta2.caption=Var2


2) Utilizando una consulta Sql y un RecordSet

Dim var as string
var = "SELECT >Tabla1.id, Tabla1.campo1, Tabla1.campo2 FROM Tabla1 " _
& "WHERE tabla1.id='" & Me.texto_id & "'"

Set db = CurrentDb()
Set rs = db.OpenRecordset(var2)
If rs.RecordCount > 0 Then
me.etiqueta1.caption = campo1 (de la Tabla1)
me.etiqueta2.caption = rs!campo2 (de la tabla2)
End If
rs.Close
Set db = Nothing
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

consultar una tabla y presentar en etiquetas

Publicado por ChriisGarciia (8 intervenciones) el 12/01/2012 19:39:28
Gracias...
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

consultar una tabla y presentar en etiquetas

Publicado por Java (3 intervenciones) el 16/01/2012 22:19:33
No será más fácil crear un formulario normal y corriente y a los controles darles la propiedad de bloqueado a Si

Un saludo JavaTex
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar