Bonjour tout le monde,
J'ai 2 tables : 1 personne et l'autre voiture ou voiture contient une clé etrangere pointant vers personne
Sur mon formulaire, je veux mettre une combo affichant les personnes. Puis, quand je choisit ma personne, les voitures de la personne s'affiche dans mon datagrid.
Ca c'est bon mais mon problème est que je ne peux pas ajouter une autre voiture à cette personne
Le fait de croiser les tables dans le datagrid, ca coince et ca bloque le datagrid qui n'affiche que les valeurs.
Voici mon code :
Private Sub DBCombo1_Click(Area As Integer)
If Area = 0 Then Exit Sub
Maj_Grid (DBCombo1.BoundText)
End Sub
Private Sub Maj_Grid(grp As Integer)
Dim reqt As String
reqt = "SELECT voiture.nom, voiture.idPers" & _
" FROM personne INNER JOIN voiture ON personne.id = voiture.idPers" & _
" WHERE personne.id = " & grp & _
" GROUP BY voiture.nom, voiture.idPers;"
DataVoiture.RecordSource = reqt
DataVoiture.Refresh
DBGrid1.Refresh
End Sub