Requêtte base access en vb6

-
Messages postés
14852
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
26 janvier 2022
-
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 !

1 réponse

Messages postés
14852
Date d'inscription
vendredi 14 mars 2003
Statut
Modérateur
Dernière intervention
26 janvier 2022
160
Bonsoir,

Quel est exactement ton problème ?

Quand tu postes un codes, merci d'utiliser la coloration syntaxique (Bouton de gauche "<>").