Leer datos de una tabla des de un formulario

11/12/2012 - 11:43 por Toni | Informe spam
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
 

Leer las respuestas

#1 Toni
11/12/2012 - 12:44 | Informe spam
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

Preguntas similares