Lerchechem
Messages postés11Date d'inscriptionvendredi 31 octobre 2008StatutMembreDernière intervention 9 juin 2009
-
8 juin 2009 à 19:43
cs_viviane44
Messages postés38Date d'inscriptionjeudi 27 septembre 2007StatutMembreDernière intervention25 mars 2014
-
11 juin 2009 à 08:51
<hr style="COLOR: #d1d1e1; BACKGROUND-COLOR: #d1d1e1" size="1" />
<!-- / icon and title -->
<!-- message -->
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
Dim strConnexion AsString = "Data Source=localhost; Initial Catalog=Nomenclature; Integrated Security=SSPI"
Dim MaBse As SqlConnection = New SqlConnection(strConnexion)
MaBase.Open()
Je passe ma requeteDim Requete_Consultation AsString "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 AsNew SqlCommand(Requete_Consultation, MaBase)
Dim req = oCommand.ExecuteReader()
Puis je passe le tout à ma datagrid
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))
EndWhile
Malheureusement, lorsque je j'execute le tout, ma grille est vide.
Pouvez-vous me dire ou se trouve mon/mes erreur(s)