Mensajes advertencia

Hola buenas he creado una BD sobre el stock de un depsito de gasoil, ahora mi pregunta es:
¿Cuándo ejecuto la consulta de actualizar ese stock quiero que si el deposito esta por debajo de los 200 Litros me salga un mensaje de advertencia, como lo pudo hacer?
Saludos y gracias !

1 Respuesta

Respuesta
1
Antes de responderte quisiera mencionaras como se llama la tabla y los campos que contiene para ser más directo con la respuesta
La tabla:
AltaDiposits -->(que contiene) Dipòsit, Stock i combustible
Puedes utilizar
dim rststock as dao.recordset
Set rststock=currentdb.openrecordset("Select * From altadiposits where stock= 200")
rststock.movelast
rststock.movefirst
if rststock.bof=false then 
'Lo que quiero hacer si no se cumple la select
else
MSgbox "Mensaje Mostrado"
end if
rststock.close
set rststock= nothing
¿I esto donde lo pongo?
Gracias!
Me da un error me dice : No hay ningún registro activo !
Y en la vista visual basic me señala en amarillo rststock.movelast
Bórrale estas partes y prueba
rststock.movelast
rststock.movefirst
Buenas si me sirve si le quito esto, pero me sirve si lo cambio a "mano" si ejecuto la consulta no me sale el mensajito ! Gracias
Eso depende de como este trabajando.
Por ejemplo si es como facturación entonce cuando intentes factura y la cantidad sea inferior a 200 entonces mostrara el mensaje.
Y toma nota.. Cuando se va a realizar una pregunta se tiene que ser lo más claro posible con el fin de que la respuesta sea igualmente certera.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas