Discussion :

[Stéph utilisateur d'acces]

bonjour à tous

j utilise un form de recherche qui m'affiche un sous form avec les résultats.

j ai 3 listes déroulantes de recherche

mon code vba repose sur le bouton rechercher.

actuellement le form de recherche n'affiche pas le nom de l'employé car ce nom figure dans une 3ième table Employés (voir le modele relationnel joint)

En fait j ai du mal à créer cette autre jointure .

voici le code du bouton rechercher, vous comprendrez mieux:

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
19
20
21
22
23
24
25
26
27
28
29
30
31
Private Sub cmdRechercher_Click()
 
'   Crée la requête en fonction des critères saisis
If cboEmploye <> "" Then
   '  Tables formations et participants
   strSQL = "SELECT FOR_IDFORM, FOR_INTITULE, " _
    & "FOR_IDDOM, FOR_IDORGA, FOR_DATEDEB, FOR_DATEFIN, " _
    & "PART_IDEMP FROM FORMATIONS INNER JOIN PARTICIPANTS " _
    & "ON FORMATIONS.FOR_IDFORM = PARTICIPANTS.PART_IDFORM"
Else
'  Table formation
   strSQL = "SELECT FOR_IDFORM, FOR_INTITULE, " _
   & "FOR_IDDOM, FOR_IDORGA, " _
   & "FOR_DATEDEB, FOR_DATEFIN FROM FORMATIONS "
End If
 
'   Prépare le filtre à appliquer au sous-formulaire
'   en concaténant les critères
p_strCond = ""
If cboDomaine <> "" Then
   p_strCond = p_strCond _
             & " AND FOR_IDDOM = " & cboDomaine
End If
If cboOrganisme <> "" Then
   p_strCond = p_strCond _
             & " AND FOR_IDORGA = " & cboOrganisme
End If
If cboEmploye <> "" Then
   p_strCond = p_strCond _
             & " AND PART_IDEMP = " & cboEmploye
End If

voila donc comment intégrer ce champ EMP_NOM à ce code?

merci à tous de votre aide

stephi

[marot_r]

La solution la plus simple pour écrire du SQL Access c'est de le faire écrire par Access.

Va dans l'éditeur de requête, contruit ta requête puis bascule l'affichage en mode SQL ... tu n'as plus qu'a lire le code SQL produit par Access et l'intégrer à ton VBA. Des heures et des heures de plaisir en moins à essayer de deviner la bonne synatxe mais du SQL fonctionnel le temps de le dire.

A+

[Stéph utilisateur d'acces]

Merci de ta réponse

Finalement c est ce que j ai fait car pas évident ces requêtes de jointures.

ça fonctionne.

bonne journée.

stephi

[Richard_35]

Bonjour à tous,

Jointure ou pas, comme le dit le sage Marot_r :

La solution la plus simple pour écrire du SQL Access c'est de le faire écrire par Access.