Discussion :

[andy38]

Bonjour, Vb Net utilisé. J’ai cette Form qui a un treeView à gauche et un
Data grid à droite qui est remplit par un dataset provenant d’une
Base de données Access. J’ai déjà la connexion avec la base de
Données vivante sous OLE dB 4.0 qui a construit le dataset. Et
Utilisant la requête suivante requete = "SELECT * FROM PRODUITS WHERE
CATEGORIE = 'Inventaire\Bushing';" .Jusqu’ici ca va, je voudrais savoir
Si c’est possible de remplacer le prédicat dans la clause WHERE,
Exemple 'Inventaire\Bushing';" par une variable
'J’essaiyé ceci mais ca marche pas
requete = "SELECT * FROM PRODUITS WHERE CATEGORIE = 'lb1Path.Text';"
Comme vous voyez, ce que j’essaie de faire c’est lorsque je clique
Sur une des branches de l’arbre qui est en somme une des Catégorie qui
S’affiche par lb1Path.Text de pouvoir s’écrire dans la requete.
voir mon code

Private Sub se_connecter(ByVal requete As String, ByVal table As String)
Dim base, chemin As String
'Chemin d'accès à la b.d. située dans le dossier bin
chemin = Application.StartupPath & "\INVENTAIRE.MDB"
base = "provider=microsoft.jet.oledb.4.0;data source=" + chemin

Dim connexion As OleDbConnection = New OleDbConnection(base)
connexion.Open()
'Lien entre la base et la requête
Dim Liaison As New OleDbDataAdapter(requete, base)
Dim Memoire As New DataSet
'Charge la table en mémoire
Liaison.Fill(Memoire, table)

Dim Vue As New DataView(Memoire.Tables(table))
grille.DataSource = Vue
connexion.Close()

Private Sub TreeView1_AfterSelect(ByVal sender As System.Object, ByVal e As System.Windows.Forms.TreeViewEventArgs) Handles TreeView1.AfterSelect

Dim node As System.Windows.Forms.TreeNode
node = TreeView1.SelectedNode

lb1Path.Text = sender.SelectedNode.FullPath

'MessageBox.Show(TreeView1.SelectedNode.ToString)

'Dim choix As Byte
Dim requete, table As String

'Sélectionne tout
requete = "SELECT * FROM PRODUITS WHERE CATEGORIE = 'Inventaire\Bushing';"
table = "PRODUITS"
se_connecter(requete, table)

[Médiat]

Lisez les règles de ce forum : pas de code hors SQL, si vous avez un problème avec vb.net allez sur le forum approprié, si c'est un problème SQL donnez-nous la requête et décrivez le problème !