Datagridview


Bonjour,
je developpe en vb 2005 avec une base de données Access.J'ai crée un datagriview (lié à une table) avec une source.je saisi un nom dans un textbox et je veux qu'il m'affiche dans le datagridview les infos de toutes les personnes ayant ce nom. Oups c'est la que sa coince.je n'arrive pas à afficher. Voila le coe que j'ai tapé :

strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\Projet de mise a jour\Basededonnées\Edson80.mdb;"

strSql = "SELECT Fi_Bordereau.F_nomclib,Fi_Bordereau.F_prenclib WHERE (((Fi_Bordereau.F_numclib)='" & Ecr025.TextBox_consnumcli.Text & "'));"

Connect = New OleDbConnection()
Connect.ConnectionString = strConn
Dim Dt As New DataTable ' Déclaration Objet DataTable
Dim DAdap As OleDbDataAdapter ' Déclaration Objet DataAdapter
DAdap = New OleDbDataAdapter(Comd)

'Try
Connect.Open()
DAdap.Fill(Dt)
Ecr025.DataGridView1.DataSource = Dt

' Finally

'Catch ex As Exception
Connect.Close()
Aidez moi nà trouver une reponse s'il vous pait !?

2 réponses

  1. Bonjour,

    Après avoir modifié le datasource, il faut faire un databind()

    Xavier
    1. j'ai trovver la reponse à ma préocupation
      et je vous la donne

      strConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= C:\Projet de mise a jour\Basededonnées\Edson80.mdb;"

      strSql = "SELECT DISTINCT Fi_Bordereau.* From Fi_Bordereau WHERE (((Fi_Bordereau.F_numclib)='" & Ecr025.TextBox_consnumcli.Text & "'));"

      Connect = New OleDbConnection() 'Instanciation d'un Objet Connexion

      Connect.ConnectionString = strConn

      Comd = New OleDbCommand(strSql) 'Instancier un objet Commande

      DataAdap = New OleDbDataAdapter(Comd) 'Instancier un objet Adapter

      Comd.Connection() = Connect 'initialiser l'objet Command

      Comd = New OleDbCommand(strSql) 'Instancier un objet Commande

      Connect.Open()

      DataAdap.Fill(DatTable)

      Ecr025.Fi_BordereauDataGridView.DataSource = DatTable

      Connect.Close()