tshiami_6002
Messages postés5Date d'inscriptionlundi 18 février 2019StatutMembreDernière intervention19 février 2019
-
Modifié le 19 févr. 2019 à 19:03
Bonjour,
sans pour autant vous fatiguer et vous lasser de la repetition je ne pas pus trouver de solution dans le probleme poser de recuperation des information dans une table.
precision:
ma table possède des informations concernant les clients, "num_client, nom, civilite prenom"
je souhaite avoir une suite au moment ou je fait le choix du num_client que le restes des information apparaisse aussi.
voici ce que je pu mettre comme syntaxe:
Dim ligne As Recordset: Dim base As Database
Set base = Application.CurrentDb
Set ligne = base.OpenRecordset('SELECT * FROM Clients WHERE num_client=' & liste_clients.Value, dbOpenDynaset)
ligne.MoveFirst
n_client.Value = liste_clients.Value
civilite.Value = ligne.Fields('civilite_client').Value
nom_client.Value = ligne.Fields('nom_client').Value
prenom_client.Value = ligne.Fields('prenom_client').Value
ligne.Close
base.Close
Set ligne = Nothing
Set base = Nothing