Remplir une datagridview

Bonjour,

dans le cadre de mon application que j'essaie de réaliser, j'ai un problème pour remplir un datagrid avec un 'Select'.

Je me connecte à ma base

Code:

---

1 2 3

Dim strConnexion As String = "Data Source=localhost; Initial Catalog=Nomenclature; Integrated Security=SSPI" Dim MaBase As SqlConnection = New SqlConnection(strConnexion) MaBase.Open()

---

Je passe ma requete

Code:

---

1 2 3

Dim Requete_Consultation As String = "SELECT Produit.NomProduit, Produit.Procedures, Produit.Mentions, Details.Famille, Details.Prefixe, Details.Suffixe, Details.NbAtomeC, Details.Nom, Details.Formule FROM Produit, Details WHERE Produit.IDElem = Details.IDElem" Dim oCommand As New SqlCommand(Requete_Consultation, MaBase) Dim req = oCommand.ExecuteReader()

---

Puis je passe le tout à ma datagrid

Code:

---

1 2 3

While req.Read() DataGridView1.Rows.Add(req(0), req(1), req(2), req(3), req(4), req(5), req(6), req(7), req(8), req(9)) End While

---

Malheureusement, lorsque je j'execute le tout, ma grille est vide.

Pouvez-vous me dire ou se trouve mon/mes erreur(s)

Merci pour votre aide

Salut,

Regarde par ici

Ca pourrait largement t'aider.