{Access} relier des champs.
jf_26
Messages postés
19
Date d'inscription
Statut
Membre
-
jf_26 Messages postés 19 Date d'inscription Statut Membre -
jf_26 Messages postés 19 Date d'inscription Statut Membre -
Bonjour,
J'ai un problème très classique je suppose;
J'ai un champ Nomclient, je veux lors de la sélection de ce client dans une liste déroulante, soit après MAJ, qu'il saisisse automatiquement le titre et le courriel de ce nomclient dans ma table client.
Le nomclient, titre et courriel sont tous dans la même table Client.
Je ne maîtrise pas bien les requêtes SQL de type inner join et tout, j'aurais besoin d'explication sur comment m'y prendre (Ou autres moyens).
Merci.
(Je suis bien conscient que ce sujet est redondant mais après avoir feuilleté plusieurs post sur ce sujet, aucun n'a le mérite d'être clair!)
J'ai un problème très classique je suppose;
J'ai un champ Nomclient, je veux lors de la sélection de ce client dans une liste déroulante, soit après MAJ, qu'il saisisse automatiquement le titre et le courriel de ce nomclient dans ma table client.
Le nomclient, titre et courriel sont tous dans la même table Client.
Je ne maîtrise pas bien les requêtes SQL de type inner join et tout, j'aurais besoin d'explication sur comment m'y prendre (Ou autres moyens).
Merci.
(Je suis bien conscient que ce sujet est redondant mais après avoir feuilleté plusieurs post sur ce sujet, aucun n'a le mérite d'être clair!)
1 réponse
-
Je crois avoir trouver ma solution avec
Dim db As Database
Dim rst As Recordset
Dim SQL As String
Set db = CurrentDb
SQL = "SELECT DISTINCT Client.Titre, Client.Courriel, Client.tel, Client.NoPoste FROM Client WHERE Client.Nomclient= '" & Me.Nomclient & "'; "
Set rst = db.OpenRecordset(SQL, dbOpenForwardOnly, dbReadOnly)
Forms![Client].Texte65 = rst.Fields("Titre")
Forms![Client].Texte67 = rst.Fields("Courriel")
Forms![Client].Texte69 = rst.Fields("tel")
Forms![Client].Texte57 = rst.Fields("NoPoste")
