Bonjour tout le monde,
En fait je voudrais afficher le resultat d'un requete "select" d'une base Access, lors d'un buton_click ; sur un DataGridView.
J'ai écrit ce code là mais le datagridview reste vide.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
Imports System.Data.OleDb
Public Class Form4
    Dim con As New OleDb.OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|\GestsssstAVECRELATION.mdb")
    Dim com As New OleDb.OleDbCommand
    Dim dr As OleDb.OleDbDataReader
    Dim da As New OleDb.OleDbDataAdapter
    Dim ds As New DataSet
 
 Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
 
        ChargerDonnees()
        Form5.Show()
        Me.Hide()
    End Sub
 
    Private Sub ChargerDonnees()
        com.CommandText = ("select * from fournisseur where nom_fournisseur='" & Me.Nom_fournisseurComboBox.Text & "'")
        Dim dt As New DataTable
        Dim adpt As New Data.OleDb.OleDbDataAdapter(com)
        Try
            con.Open()
            adpt.Fill(dt)
            Form45.DataGridView1.DataSource = dt
        Finally
            con.Close()
        End Try
    End Sub
Mais je ne sais pas qu'est ce qui ne va pas , mais le datagridview du form5 reste vide aprés execution.

Merci de m'aider.