Leer datos de una tabla des de un formulario

Buenas otra vez,

De momento, he canviado un poco la configuración del formulario, y he conseguido que el recordset me localize el valor del registro de 'Expedientes:

Dim db As Database
Dim rs As Recordset
Dim iAñoExp As Integer

iAñoExp = TxtYExp
Set db = CurrentDb
Set rs = db.OpenRecordset("SELECT IdExpediente FROM Expedientes WHERE [AñoExpediente] = " & iAñoExp)


Ahora, la pregunta és: ¿cómo puedo asignar este valor del recordset al campo IdExpPedido del formulario?

Muchas gracias.
Toni


El dimarts 11 de desembre de 2012 11:43:46 UTC+1, Toni va escriure:

Buenos dias,



Tengo dos tablas:



PEDIDOS: IdPedidos... , FechaPedido, ... IdExpPedido

EXPEDIENTES: IdExpediente... AñoExpediente



En un formulario de la tabla 'Pedidos', deseo que para el evento AfterUpdate del campo 'FechaPedido', el código busque en 'Expedientes' el registro (único) con el campo 'AñoExpediente' = 'FechaPedido', i inserte el valor 'IdExpediente' de este registro en el campo 'IdExpPedido' de la tabla 'Pedidos'.



Espero que sea suficientemente claro. Muchas gracias de antemano.

Toni

Hola
Asigna el valor a la propiedad VALUE del control (imagino que es un cuadro de texto).
De todos modos, puedes simplificar la obtención mediante las funciones agregadas de dominio, en concreto la función DLOOKUP
Espero te sirva.

Salu2
José Mª Fueyo
[MS MVP Access]

José Mª,

al final lo conseguí con la siguiente sentencia:

Me.TxtIdExpBases.Value = rs.Fields(0).Value

No sé si te referias a esta propiedad. Miraré también la función DLOOKUP.
Gracias,
Toni

El dimarts 11 de desembre de 2012 17:02:15 UTC+1, José Mª Fueyo va escriure:

Hola

Asigna el valor a la propiedad VALUE del control (imagino que es un cuadro de texto).

De todos modos, puedes simplificar la obtención mediante las funciones agregadas de dominio, en concreto la función DLOOKUP

Espero te sirva.



Salu2


José Mª Fueyo

[MS MVP Access]

Hola
Exacto, me refería a esa propiedad del cuadro de texto que has nominado como TxtIdExpBases

Salu2
José Mª Fueyo