Bonjour,
dans mon formulaire j'ai mis une zone de liste deroulante qui recupere ses valeurs d'une tables.
cette zone de liste "Reseaux" contient 4 types de reseaux (res1, res2, res3 res4) avec res4= res1+res2.
Mon soucis vient de ces res4 , vu que je peux pas afficher les informations le concernant.
je suis passé par du code , peut etre il y a quelquechose qui ne va pas , et j'ai besoin de votre coup de main .
en vous remerciant
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 Private Sub RESEAUX_BeforeUpdate(Cancel As Integer) Dim SQL As String Select Case RESEAUX Case 1: Me.RESEAUX.Value = "res1" SQL = "Select * From FINAL where (LB_Reseaux= 'res1');" Case 2: Me.RESEAUX.Value = "res2" SQL = "Select * From FINAL where (LB_Reseaux= 'res2');" Case 3: Me.RESEAUX.Value = "res3" SQL = "Select * From FINAL where (LB_Reseaux= 'res3');" Case 4: Me.RESEAUX.Value = "res4" SQL = "Select * From FINAL where (LB_Reseaux= 'res1' OR LB_Reseaux= 'res2');" End Select End Sub
Partager