Discussion :

[chougadosu]

Bonjour à tous,
Sur la propriété source de mon sous-formulaire, j'ai créé cette instruction SQL:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
SELECT DISTINCTROW Demandeur.TDemandeur, Activite.TActivite, Intitule.TIntitule, Ligne.TLigne, Poste.TPoste, Cause.TCause, Action.TAction, Action.Type, Action.Close, Delai.TDelai, Pilote.TPilote, DateRealise.TRealise, Produit.TProduit, Service.TService, Pilote.NumPilote
FROM (((((Ligne INNER JOIN (Activite INNER JOIN ((Demandeur INNER JOIN Intitule ON Demandeur.NumDemandeur = Intitule.NumDemandeur) INNER JOIN Pilote ON Demandeur.NumDemandeur = Pilote.NumDemandeur) ON Activite.NumActivite = Intitule.NumActivite) ON Ligne.NumLigne = Intitule.NumLigne) INNER JOIN Poste ON Ligne.NumLigne = Poste.NumLigne) INNER JOIN (Delai INNER JOIN (Cause INNER JOIN [Action] ON Cause.NumCause = Action.NumCause) ON Delai.NumDelai = Action.NumDelai) ON (Pilote.NumPilote = Action.NumPilote) AND (Intitule.NumIntitule = Action.NumIntitule)) INNER JOIN Service ON Pilote.NumPilote = Service.NumPilote) INNER JOIN Produit ON Intitule.NumProduit = Produit.NumProduit) INNER JOIN DateRealise ON Pilote.NumPilote = DateRealise.NumPilote
WHERE (((Pilote.NumPilote)=[Action].[NumPilote] And (Pilote.NumPilote)=[DateRealise].[NumPilote] And (Pilote.NumPilote)=[Service].[NumPilote]) AND ((Activite.NumActivite)=[Intitule].[NumActivite]) AND ((Produit.NumProduit)=[Intitule].[NumProduit]) AND ((Ligne.NumLigne)=[Intitule].[NumLigne] And (Ligne.NumLigne)=[Poste].[NumLigne]) AND ((Cause.NumCause)=[Action].[NumCause]) AND ((Delai.NumDelai)=[Action].[NumDelai]) AND ((Demandeur.NumDemandeur)=[Pilote].[NumDemandeur] And (Demandeur.NumDemandeur)=[Intitule].[NumDemandeur]))

Et sur ce sous-formulaire, s'affichent les enregistrements de mes tables de ma base. Lorsque je met à jour mes tables, les nouveaux enregistrements ne sont pas pris en compte lorsque s'affichent de nouveaux les enregistrements de mes tables.
J'ai même mis

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.sous_Formulaire.Requery

mais rien ne fonctionne. Merci pour votre aide

[Jean-Philippe André]

salut,
ta clause WHERE me semble redondante avec ton INNER JOIN

une petite mise a jour du SQL sans perte de vitesse est a envisager

[chougadosu]

Salut jpcheck,
Merci d'avoir passé ton temps à mon problème. Oui, t'as raison j'ai de redondance à cette instruction SQL. Même si j'enlève INNER JOIN ou je garde INNER JOIN et j'enlève la clause WHERE, ily a toujours la redondance. Comment puis-je éviter cette redondance.

[Jean-Philippe André]

en decomposant ta requete, voici la liste des champs qui sont sujet a jointure :

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
Demandeur.NumDemandeur = Intitule.NumDemandeur
Demandeur.NumDemandeur = Pilote.NumDemandeur
Activite.NumActivite = Intitule.NumActivite
Ligne.NumLigne = Intitule.NumLigne
Ligne.NumLigne = Poste.NumLigne
Cause.NumCause = Action.NumCause
Delai.NumDelai = Action.NumDelai
Pilote.NumPilote = Action.NumPilote
Intitule.NumIntitule = Action.NumIntitule
Pilote.NumPilote = Service.NumPilote
Intitule.NumProduit = Produit.NumProduit
Pilote.NumPilote = DateRealise.NumPilote

Et voila la liste des champs qui sont dans ta clause WHERE

Code SQL :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Pilote.NumPilote=[Action].[NumPilote]
Pilote.NumPilote=[DateRealise].[NumPilote]
Pilote.NumPilote=[Service].[NumPilote]
Activite.NumActivite=[Intitule].[NumActivite]
Produit.NumProduit=[Intitule].[NumProduit]
Ligne.NumLigne=[Intitule].[NumLigne]
Ligne.NumLigne=[Poste].[NumLigne] 
Cause.NumCause=[Action].[NumCause]
Delai.NumDelai=[Action].[NumDelai]
Demandeur.NumDemandeur=[Pilote].[NumDemandeur] Demandeur.NumDemandeur=[Intitule].[NumDemandeur]

tout ce qui est deja dans la liste des jointures est inutile dans la liste des WHERE