Ajout dans BDD depuis datagridview en VB.net Fermé

Question

Bonjour, 

J'ai un formulaire avec un datagridview qui m'affiche les données de produits et j'aimerais pouvoir depuis mon datagridview ajouter modifier ou supprimer des produits.
J'ai déjà les requêtes que j'ai mis dans mon dataset.

Donc je voudrais juste savoir comment on peut ajouter, modifier et même supprimer les données d'une base de données depuis un datagridiew.

Merci d'avance

Configuration: Windows 7 / Firefox 12.0

Utilisateur anonyme · Answer

Bonjour,

Il existe plusieurs façons :

J'en ai proposé une ici :

https://forums.commentcamarche.net/forum/affich-24435458-programmation-vb-sur-bdd

télécherger http://membre.oricom.ca/lupin/xfr/Modele_107.zip

bien que complexe, elle s'appuit sur une structure utlisé dans l'insdustrie.

rien n'est parfait :-)

Cdt

Lupin

poupou61 · Answer

Bonjour, 

Premièrement merci de m'avoir répondu.

Mais j'ai quelques Questions car je pense n'avoir pas tout compris.

Tout d'abord j'ai une erreur dans le for each sur le dr.read ("cette expression est une valeur et ne peut donc pas être la cible d'une assignation")

Je vous met un exemple de ma fonction ConvertirDrListe. Pourriez vous me dire ce qui ne va pas svp ??? (DGVProd = DataGridViewProduit)

Function ConvertirDrList(ByVal dr As IDataReader) As List(Of Produit)
        Dim Liste As ListProduit
        Dim entite As Produit

        For Each dr.Read In DGVProd
            entite = New Produit
            entite.Nom = dr(0)

        Next

        Return Liste
    End Function

Utilisateur anonyme · Answer

Bonjour,  

Vite comme cela, je ne peux te répondre, il y a trop longtemps  
que je n'ai utilisé un ( dr.Read ).  

À première vue, tu tente d'utiliser un DataReader sur un DataGridView 

 For Each dr.Read In DGVProd 

C'est avec Oracle que j'ai utilisé cette instruction  

sous Access j'utilise toujours :  



        Try  
            Dim reqSQL As String = Video_REQ.ObtenirSQL_Liste_Video(Critere)  

            MonAdapteur = New OleDbDataAdapter(reqSQL, Connexion)  
            MonAdapteur.Fill(MonDataSet, "TableVideo")  
            MonDataTable = MonDataSet.Tables("TableVideo")  

            For Each DataRowLocal In MonDataTable.Rows  
                MonEntite = CreerInstance(DataRowLocal, pChemin)  
                MaCollection.Add(MonEntite)  
            Next  


        Catch ex As Exception  
            Debug.WriteLine("Erreur - Video_SQL - Obtenir_Liste_Videos")  
            MaCollection = Nothing  
        Finally  
            Connexion.Close()  
        End Try  



Pour ton besoin, si tu veux balayer la liste du DataGridView ? 

Dim Indice As Int32 = Me.DGVProd.RowCount 

For Boucle As Int32 = 0 To Indice 

DGVProd.Rows(Boucle).Cells(0).Value = "xyz" 

... 

Sinon, je testerai bientôt l'accès à une BD avec un DataReader 
si ça t'intéresse, je te tiens au courant, je devrais faire cela 
Vendredi prochain. 

p.s. sur l'hyperlien de l'autre fil, capture les 2 versions
Modele_108.zip et Modele_109.zip

Je partirai de Modela_109.zip pour l'accès à MySQL.

Cdt  

Lupin

poupou61 · Answer

oui sa intéresserait. 

En tout cas merci, pour ton aide.

Ajout dans BDD depuis datagridview en VB.net

4 réponses

Discussions similaires