Cuadro de Mensaje

Tengo un formulario con los siguientes campos
Folio
Anaquel
Estante
Folio de Embarque
Este formulario me sirve para dar de alta productos que sólo ocupan el estante mientras estén en bodega, una vez que se embarcan, ¿se registra el número en el campo? ¿Folio de Embarque?, y queda el estante vacío para ocuparlo nuevamente, por lo tanto, ¿quisiera qué al dar de alta un nuevo producto y al llegar al campo? ¿Estante? ¿Me mande un mensaje? ¿El estante ya esta ocupado con el folio X?, ¿Siempre y cuando el campo? ¿Folio de Embarque? Este vacío.

1 respuesta

Respuesta
1
Yo te diría es que cada vez que guardes o estés en el registro donde el folio no este vacío, BLOQUEES el campo estante.
De todas maneras te doy las dos soluciones:
1.Con el mensaje:
Las cajas de texto tienes un evento llamado gotfocus "Al recibir el enfoque", aquí en este evento de la caja estante es donde trabajaremos, (Ve a propiedades de la caja, ficha eventos, y busca "Al recibir el enfoque", Haz click en el botón al frente de este evento con puntos suspensivos, y luego elige "Generador de código").
Bueno hemos entrado al código, ahora escribiremos en este evento: (quedaría algo como así, depende si la caja se llama Estante):
***************************
Private Sub Estante_GotFocus()
if not isnull(Folio_de_Emabarque) and Folio_de_Emabarque <> "" then
msgbox "El estante ya esta ocupado con el folio No " & Folio_de_Emabarque,VbInformation,"Alerta"
Folio_de_embarque.setfocus
end if
End Sub
***************************
Preguntamos si el Folio de Emabarque (Que es una caja de texto que llame Folio_de_Emabarque) no esta nulo (Not Isnull(Folio_de_Emabarque)), o no esta vacío (Folio_de_Emabarque <> "" ), entonces quiere decir que hay un dato, mostramos un mensaje:
msgbox "El estante ya esta ocupado con el folio No " & Folio_de_Emabarque,VbInformation,"Alerta"
Y mandamos el enfoque a otro control (En este caso lo mande a una caja de texto llamada Folio_de_Emabarque).
2. Cada vez que esta en el registro, y bloquear la caja de estante...
Para esto selecciona el formulario, y ve al evento "Al actualizar el Registro" (Current)... selecciona el borde del formulario y entra a propiedades, eventos, y luego "Al actualizar el registro"...
Ahora escribe lo Ste:
*******************
Private Sub Form_Current()
if not isnull(Folio_de_Emabarque) and Folio_de_Emabarque <> "" then
estante.Locked = true
else
estante.Locked = false
end if
End Sub
*******************
Aca lo que se hace es que siesta lleno Folio_de_Emabarque, se bloque la caja Estante (estante.Locked = True), de lo contrario se desbloquea (estante.Locked = False)
...
Ojala te sirva, me cuenta como te fue...
Att:TELEMACO

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Buscar por cuadro de texto

Tengo un tabla llamada "folios", en la cual tengo la columna folio la cual es mi ID en la que están contenidas los folios del P001 alP100, tengo otra tabla llamada "productos" con las columnas idproducto, folio, producto, descripción, conteo. Estas...
2 respuestas

Código en access para impedir que un registro avance si el primero queda vacio

Primero: Como puedo hacer para que un campo de un formulario no avance si antes cumpla con la obligatoriedad de ser llenado, cabe indicar que ciertos campos son necesarios de llenar y otros no. ¿Qué código debo utilizar y en que evento? Segundo:...
1 respuesta

Impedir cambios en un campo

Quisiera impedir que se cambiaran o borraran los datos de un campo que es clave principal de una tabla, contiene nombres de personas, y que forma parte de varias consultas y formularios, pero que en cambio que SI se pudieran introducir nuevos datos,...
1 respuesta

Campo obligatorio

Gracias por ayudarme vía correo con el problemilla anterior. Ahora se me presenta la duda de como puedo hacer un campo obligatorio en un formulario de manera que si voy a escribir algo en los demás campos me salga un mensaje diciéndome que el campo...
1 respuesta

Como ingresar varios registros con campos en común

Espero me puedan ayudar. Tengo una tabla de ordenes de compra cuyos campos son: numeroOC, Fecha, Producto, Cantidad y Precio. Con esto para ingresar una orden de compra con por ejemplo 5 productos debo ingresar 5 registros, los cuales van a tener el...
1 respuesta

Bloqueo, desbloqueo en un formulario

Tengo un formulario en el que quiero que por seguridad, para modificar los registros ya existentes, se de a un botón. Además quiero que antes de cambiar de registro ciertos campos tengan que estar rellenos.
1 respuesta

Userform en Access

Desde Colombia, quiero preguntarles como puedo insertar una Userform en Access, tal como se hace en Macro en excel, y si no es posible realizar esto deseo preguntarle como debo de establecer el ancho y el alto de un formulario de manera...
2 respuestas

Como guardar un campo concatenado en una tabla?

Tengo un formulario que me agrega nuevos registros en una tabla donde se teclean y en origen de control se direccionan a esa tabla y se agregan, sim embargo un campo en este formulario me genera el campo "Código" concatenando 3 campos uno que se...
1 respuesta

¿Cómo puedo comprobar si un registro ya ha sido cargado en la base de datos antes de insertarlo?

Tengo un formulario de entrada de datos para una tabla y quisiera verificar por intermedio del campo clave o los campos claves si ese registro ya existe en la tabla y dar un mensaje al usuario antes de cargar todos los campos al formulario (si...
2 respuestas

Relacionar un formulario con una consulta

Espero me puedas echar una mano. Quiero comparar un apellido y fecha de nacimiento introducidas en una tabla mediante formulario, con los campos ídem. En una consulta, y que me salga un mensaje de duplicidad. Por favor mira si me puedes poner un...
1 respuesta