Discussion :

[bruce207]

Bonjour,
mon probleme est le suivant : j'ai un datagrid que je voudrais alimenter avec des données de 4 tables différentes ( MEMBRE, COMPTE, EMPRUNT, REMBOURSEMENT) et j'ai taper le code suivant :

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
 
Private Sub Form_Activate()
FrmPrin.Height = 5670
FrmPrin.Width = 11655
'Instanciation des variables
Set cnx = New ADODB.Connection
Set rst = New ADODB.Recordset
Call Connexion(cnx) ' procedure de connexion
'Définition du curseur
rst.CursorLocation = adUseClient
'Exécution de la requête
rst.Open " SELECT * FROM membre ", cnx, adOpenKeyset, adLockOptimistic, adCmdText
If rst.RecordCount = 0 Then
MsgBox " Il n'y a aucun enregistrement dans la base"
Exit Sub
End If
Set DataGrid1.DataSource = rst
DataGrid1.Refresh
End Sub

Avec ça il affiche les données de la tables membre, le truc c'est qu'il ne m'affiche plus rien lorsque je remplace la ligne colorié par celle ci

Code :

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

rst.Open " SELECT * FROM membre, compte, emprunt, remboursement",  cnx, adOpenKeyset, adLockOptimistic, adCmdText

il est à noter que les tables sont vides à l'exception de la table membre, il m'envoie mon msg du msgbox. Comment faire pour afficher mes données en depit du fait que les tables soient vides et je voudrais aussi savoir si le type de curseur ici sied à la situation (parce que je ne maitrise pas bien le definition du curseur).
Merci d'avance

[Delbeke]

Peut ête en utilisant la clause Left Join dans la requete

[bruce207]

Quel est la syntaxe ? Parce que je ne maitrise pas cet element

[ProgElecT]

L'ami Delbeke (salut) a deja donné la reponse dans ce post, avant derniere intervention

[bruce207]

Bonjour,
merci pour le lien j'y suis allé mais la formule ne s'arrete qu'à 3 tables tandis que moi j'ai 4 tables. J'ai meme essayer le code suivant :

Code :

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

1
2
3
4
5
6
7
Select  Table1.*,Table2.Champ2,Table3.Champ2
From Table1
Inner Join (
                Table2 Inner Join Table3 Inner Join (Table4 on Table3.champ1=Table4.champ4) on
                On Table2.Champ2=Table3.Champ1
             )
On Table1.Champ2=Table2.Champ1

mais il ne marche pas. J'ai un message qui me dit qu'il y a une erreur dans de syntaxe dans la clause FROM.
Dont si quelqu'un (Delbeke) peut corriger ma syntaxe et me donner la syntaxe pour n tables ce serait gentil et je le remercie d'avance.

[ThierryAIM]

déjà, tu as 2 fois On dans ta 2e jointure et il me semble que tes () sont mal placées