bmayobo
-
27 juil. 2013 à 23:13
NHenry
Messages postés15113Date d'inscriptionvendredi 14 mars 2003StatutModérateurDernière intervention22 avril 2024
-
28 juil. 2013 à 18:18
Bonjour,
Salut à tous,
Je réaliser une application sous vb6 avec une base Access 2013
Je souhaiterais faire une requête dans la base depuis vb6
Pilote ODBC
Set cnx = New ADODB.Connection
Set Rs = New ADODB.Recordset
Chaine = "provider=msdasql;dsn=nomDns"
cnx.Open chaine
Sur saisie dans textbox1 la valeur du champ a extraire le données
Sur boutobClick on exécute la requête
Ex : SELECT Client.NumClient, Client.NomClient, Client.CodCatClient, Client.Adresse, Client.NumTel, Commande.NumBonCom, Commande.NumProd, Commande.DateBonCom, Produit.NumPro, Produit.DesiPro
FROM Produit INNER JOIN (Client INNER JOIN Commande ON Client.NumClient = Commande.NumClient) ON Produit.NumPro = Commande.NumProd
WHERE ((([Client])="")) OR (((Client.NumClient)=[Client]))
On extrait seulement le données correspondant aux texte dutextbox1
En suite afficher dans un report
La requête est multi table
Votre aide mes sera de plus grande utilité Merci !