Access - Condición IF para mostrar ciertos botones

 
Vista:
sin imagen de perfil
Val: 11
Ha aumentado su posición en 6 puestos en Access (en relación al último mes)
Gráfica de Access

Condición IF para mostrar ciertos botones

Publicado por Javier (8 intervenciones) el 30/03/2018 05:47:32
Buenas. Soy nuevo en el foro, a igual que novato en ACCES pero de a poquito voy aprendiendo.
Necesito ayuda por favor para mostrar un botón u otro o 2 según si el cliente de la tabla CLIENTES crea un pedido en la tabla PEDIDOS. Es decir: solo algunos clientes tienen pedido. Lo que necesito es que el botón "BtPedidosDelCliente" que se encuentra en el formulario Clientes solo aparezca cuando disponga de pedidos provenientes de la tabla PEDIDOS, sino dispone que aparezca el botón "BtCrearPedidosCliente" o si dispone pedidos que aparezcan los 2 botones.

En el formulario Clientes aparece un cuadro de lista con los mismos clientes. Lo que creí conveniente, porque fui averiguando, fue en la Hoja de Propiedades (Tipo de selección: Formulario) activar en la parte de Eventos "Al activar registro". De allí pensé que se podría escribir en un Macro pero la verdad que todavía no consigo que funcione. Probé con "Buscar Registro".

O escribir en el "Generador de códigos" pero todavía no consigo información de cómo avisarle al programa (una consulta). Lo que probé fue en la Hoja de Propiedades (Tipo de selección: BtPedidosDelCliente) Visible: No. Para luego poner en el "Generador de códigos" esto:

1
2
DoCmd.GoToRecord , , acNewRec
BtPedidosDelCliente.Visible = True

Pude formar esta consulta:

1
2
3
SELECT Count(Pedidos.Id_Cliente) AS TotalPedidosXCliente
FROM PEDIDOS
WHERE (((PEDIDOS.[Id_Cliente])=2));

Que mostraría, por ejemplo, los pedidos del cliente con "Id_Cliente = 2".

El tema es que no se cómo empezar a ordenar esta cuestión.

El link del proyecto completo es:
http://ge.tt/9bKQIEp2


Ojalá puedan ayudarme por favor.
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
sin imagen de perfil
Val: 11
Ha aumentado su posición en 6 puestos en Access (en relación al último mes)
Gráfica de Access

Condición IF para mostrar ciertos botones

Publicado por Javier (8 intervenciones) el 30/03/2018 14:45:21
Encontré la solución gracias a un compañero de la web.

1
2
3
4
5
6
7
8
9
10
11
12
Dim stDocName As String
Dim stLinkCriteria As String
 
stDocName = "CLIENTES"
 
stLinkCriteria = "[Id_Cliente]=" & Me.cmd_listaClientes.Column(0)
DoCmd.OpenForm stDocName, , , stLinkCriteria
If Me.Texto81 <> 0 Then
Me.BtPedidosDelCliente.Visible = True
Else
Me.BtPedidosDelCliente.Visible = False
End If

Con el campo de texto Texto81:

1
=DCont("Id_Cliente";"PEDIDOS";"[pedidos.id_cliente]=" & [Id_Cliente])


SALUDOS!!
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
1
Comentar