Discussion :

[Lerchechem]

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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 :

Sélectionner tout - Visualiser dans une fenêtre à part

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

[amirad]

Salut,

Regarde par ici

Ca pourrait largement t'aider.