Bonjour ;
j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la
table1 dans une formulaire en mode contenu , et je veux afficher d'autres
champs de la Table2 dans la meme ligne de formulaire , ce code que si dessus
il m'affiche le premier champs de la table2 dans toutes les enregistrement
de la formulaire ?
Comment modifier ce code pour qu'il m'affiche chaque champs dans le bon
enregistrement .?? pourtant il y'a
If Me!NArticle = Rs.NArticle Then
---------------------------
Dim Db As DAO.Database
Dim Rs As DAO.Recordset
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("Article")
If Me!NArticle = Rs.NArticle Then
Rs.MoveFirst
Me.Liste = Rs!Prix.Value
Rs.MoveNext
End If
Rs.Close
Set Rs = Nothing
Set Db = Nothing
-------------------------
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gilbert
Bonjour,
Tu peux sortir les Rs.Move... de ton test sinon tu testes toujours la même chose
Do While not Rs.EOF Rs.MoveFirst If Me!NArticle = Rs.NArticle Then Me.Liste = Rs!Prix.Value End If Rs.MoveNext Loop Mais je pense que tu ferais mieux de baser ton recordset sur une requête selection du genre "Select * from article where article.NArticle= " & Me!NArticle (si NArticle est numérique) ou "Select * from article where article.NArticle= '" & Me!NArticle & "'" (si NArticle est texte)
Gilbert
"BerloSconi" a écrit dans le message de news:
Bonjour ; j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la table1 dans une formulaire en mode contenu , et je veux afficher d'autres champs de la Table2 dans la meme ligne de formulaire , ce code que si dessus
il m'affiche le premier champs de la table2 dans toutes les enregistrement de la formulaire ? Comment modifier ce code pour qu'il m'affiche chaque champs dans le bon enregistrement .?? pourtant il y'a If Me!NArticle = Rs.NArticle Then --------------------------- Dim Db As DAO.Database Dim Rs As DAO.Recordset Set Db = CurrentDb Set Rs = Db.OpenRecordset("Article") If Me!NArticle = Rs.NArticle Then Rs.MoveFirst Me.Liste = Rs!Prix.Value Rs.MoveNext End If Rs.Close Set Rs = Nothing Set Db = Nothing -------------------------
Bonjour,
Tu peux sortir les Rs.Move... de ton test sinon tu testes toujours la même
chose
Do While not Rs.EOF
Rs.MoveFirst
If Me!NArticle = Rs.NArticle Then
Me.Liste = Rs!Prix.Value
End If
Rs.MoveNext
Loop
Mais je pense que tu ferais mieux de baser ton recordset sur une requête
selection du genre
"Select * from article where article.NArticle= " & Me!NArticle (si NArticle
est numérique)
ou
"Select * from article where article.NArticle= '" & Me!NArticle & "'" (si
NArticle est texte)
Gilbert
"BerloSconi" <lassaad.braham@planet.tn> a écrit dans le message de
news:ujnflaQaGHA.5088@TK2MSFTNGP03.phx.gbl...
Bonjour ;
j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la
table1 dans une formulaire en mode contenu , et je veux afficher d'autres
champs de la Table2 dans la meme ligne de formulaire , ce code que si
dessus
il m'affiche le premier champs de la table2 dans toutes les enregistrement
de la formulaire ?
Comment modifier ce code pour qu'il m'affiche chaque champs dans le bon
enregistrement .?? pourtant il y'a
If Me!NArticle = Rs.NArticle Then
---------------------------
Dim Db As DAO.Database
Dim Rs As DAO.Recordset
Set Db = CurrentDb
Set Rs = Db.OpenRecordset("Article")
If Me!NArticle = Rs.NArticle Then
Rs.MoveFirst
Me.Liste = Rs!Prix.Value
Rs.MoveNext
End If
Rs.Close
Set Rs = Nothing
Set Db = Nothing
-------------------------
Tu peux sortir les Rs.Move... de ton test sinon tu testes toujours la même chose
Do While not Rs.EOF Rs.MoveFirst If Me!NArticle = Rs.NArticle Then Me.Liste = Rs!Prix.Value End If Rs.MoveNext Loop Mais je pense que tu ferais mieux de baser ton recordset sur une requête selection du genre "Select * from article where article.NArticle= " & Me!NArticle (si NArticle est numérique) ou "Select * from article where article.NArticle= '" & Me!NArticle & "'" (si NArticle est texte)
Gilbert
"BerloSconi" a écrit dans le message de news:
Bonjour ; j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la table1 dans une formulaire en mode contenu , et je veux afficher d'autres champs de la Table2 dans la meme ligne de formulaire , ce code que si dessus
il m'affiche le premier champs de la table2 dans toutes les enregistrement de la formulaire ? Comment modifier ce code pour qu'il m'affiche chaque champs dans le bon enregistrement .?? pourtant il y'a If Me!NArticle = Rs.NArticle Then --------------------------- Dim Db As DAO.Database Dim Rs As DAO.Recordset Set Db = CurrentDb Set Rs = Db.OpenRecordset("Article") If Me!NArticle = Rs.NArticle Then Rs.MoveFirst Me.Liste = Rs!Prix.Value Rs.MoveNext End If Rs.Close Set Rs = Nothing Set Db = Nothing -------------------------
3stone
Salut,
"BerloSconi" | j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la | table1 dans une formulaire en mode contenu , et je veux afficher d'autres | champs de la Table2 dans la meme ligne de formulaire [...]
Donc, tu crée une requête basée sur les deux tables avec les champs souhaités.
"BerloSconi"
| j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la
| table1 dans une formulaire en mode contenu , et je veux afficher d'autres
| champs de la Table2 dans la meme ligne de formulaire
[...]
Donc, tu crée une requête basée sur les deux tables avec les champs souhaités.
"BerloSconi" | j'ai 2 tables lier avec NArticle, j'ai afficher les enregistrements de la | table1 dans une formulaire en mode contenu , et je veux afficher d'autres | champs de la Table2 dans la meme ligne de formulaire [...]
Donc, tu crée une requête basée sur les deux tables avec les champs souhaités.
