Hola a todos:
Tengo un problema...
Estoy creando una base de datos para gestionar las entregas de mercancía.
He creado una tabla con datos tales como FECHA, EXPEDICIÓN, REMITENTE, DESTINATARIO, FECHA ENTREGA, BULTOS Y KILOS.
Otra tabla son las tarifas en función de los kilos, con los siguientes campos:DEKILOS, AKILOS y TARIFA.
Para introducir y visualizar los datos he "intentado" crear un formulario, con los datos de la 1ª tabla y he introducido un subformulario que trato que me indique la tarifa a aplicar nada más introducir los datos.A la etiqueta le he indicado origen de control la tabla tarifa.
He escrito el siguiente código:
Private Sub TARIFA_BeforeUpdate(Cancel As Integer)
Dim KILOS As Integer, TARIFA As Double
Me!Tarifa=Dlookup("[Tarifa]","[Tarifas]",[DEKILOS]<="&Me!KILOS&"and[AKILOS]>="&Me!KILOS)
Lo único que consigo es que introduciendo los datos tras meter los kilos paso el tabulador y me da la tarifa correspondiente al menor periodo de kilos, vuelvo a pulsar, y me da la siguiente tarifa, vamos que voy...
Me podeís hechar una mano? Muchas gracias y un saludo
