[vb.net] Modifier un enregistrement dans un dataGridRésolu

Question

Bonjour &#224; tous,

Je d&#233;veloppe en vb.net dans le cadre de mon stage
Je liste des clients dans un datagrid de ma Form4. Pour ajouter des enregistrements dans mon datagrid aucun probl&#232;me...
Par contre je voudrais pouvoir modifier les donn&#233;es de mes clients (mail, tel....)
Pour cela je clique sur un &#233;l&#233;ment de mon datagrid puis sur un bouton de commande 'Modifier' . Je r&#233;cup&#232;re alors toutes mes donn&#233;es dans les textbox d'une autre form (Form5)
Je voudrais alors qu'en modifiant une donn&#233;e elle se mette &#224; jour dans mon datagrid.

Le probl&#232;me c'est que je met toujours &#224; jour le premier quelque soit l'&#233;l&#233;ment que je s&#233;lectionne dans mon datagrid ...

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        'Initialisation de la cha&#238;ne de param&#232;tres pour la connexion
        strConn = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
                "Data Source= " & Application.StartupPath & "" & "chequeAlsace.mdb;"

        'Initialisation de la cha&#238;ne contenant l'instruction SQL
        strsql = "SELECT Particulier.* FROM Particulier"

        'Instanciation d'un Objet Connexion
        Connection = New OleDbConnection

        'Donner &#224; la propri&#233;t&#233; ConnectionString les param&#232;tres de connexion
        Connection.ConnectionString = strConn

        'Ouvrir la connexion
        Connection.Open()

        'Instancier un objet Commande
        ObjetCommand = New OleDbCommand(strsql)

        'Instancier un objet Adapter
        MonAdapter = New OleDbDataAdapter(ObjetCommand)

        'initialiser l'objet Command
        ObjetCommand.Connection() = Connection

        'Avec l'aide de la propri&#233;t&#233; Fill du DataAdapter charger le DataSet
        MonAdapter.Fill(MonDataSet, "Particulier")

        'Mettre dans un Objet DataTable une table du DataSet
        ObjetDataTable = MonDataSet.Tables("Particulier")

        RowNumber = Form4.DataGrid1.CurrentRowIndex + 1
        ' Extraire l'enregistrement courant
        ObjetDataRow = MonDataSet.Tables("Particulier").Rows(RowNumber)

        'Modifier les valeurs des champs en r&#233;cup&#233;rant le contenu des TextBox
        'ObjetDataRow("NumCientP") = Form4.DataGrid1.CurrentRowIndex + 1
        ObjetDataRow("CivilCliP") = cbCivil.Text
        ObjetDataRow("NomCliP") = txtNomCli.Text
        ObjetDataRow("PrenomCliP") = txtPrenomCli.Text
        ObjetDataRow("AdrCliP") = txtAdrCli.Text
        ObjetDataRow("CompAdrCliP") = txtCompAdrCli.Text
        ObjetDataRow("CPCliP") = txtCPCli.Text
        ObjetDataRow("VilleCliP") = txtVilleCli.Text
        ObjetDataRow("TelCliP") = txtTelCli.Text
        ObjetDataRow("FaxCliP") = txtFaxCli.Text
        ObjetDataRow("MailCliP") = txtMailCli.Text

        'Pour modifier les valeurs chang&#233;es dans le DataAdapter
        ObjetCommandBuilder = New OleDbCommandBuilder(MonAdapter)

        'Mise &#224; jour
        MonAdapter.UpdateCommand = ObjetCommandBuilder.GetUpdateCommand
        MonAdapter.Update(MonDataSet, "Particulier")

        'On vide le DataSet et on le 'recharge' de nouveau.
        MonDataSet.Clear()
        MonAdapter.Fill(MonDataSet, "Particulier")
        ObjetDataTable = MonDataSet.Tables("Particulier")

        Me.Hide()
        Form4.Show()
    End Sub

Merci d'avance ...

fduchamp · Accepted Answer

dans ton form4 declare une variable public:
public intRowNumber as integer

et avant l ouverture de ton formulaire de modification de affecte la valeur
intRowNumber =Form4.DataGrid1.CurrentRowIndex + 1

ensuite dans ton formulaire de modif tu pourras faire
RowNumber = intRowNumber 

Ca devrait fonctionner

fduchamp · Answer

Bonjour,

je te conseil de passer par le debugage de l application et de verifier ce que te renvois cette ligne:
RowNumber = Form4.DataGrid1.CurrentRowIndex + 1
je pense que dans RowNumber tu dois avoir 1
si c'est le cas je te conseil de memoriser dans une variable publique la valeur de Form4.DataGrid1.CurrentRowIndex + 1 au moment ou tu cliques sur la ligne a modifier ou alors sur l evenement du bouton Modifier.

cs_mik67 · Answer

En fait il me renvoie '0' pour RowNumber soit -1 en fait &#224; cause du +1 ....

cs_mik67 · Answer

En fait il me renvoie '0' pour RowNumber soit -1 en fait &#224; cause du +1 ....

cs_mik67 · Answer

A priori &#231;a fonctionne sur la m&#234;me form mais pas d'une form a l'autre ..... bizarre .... Il ne retient pas la valeur de rownumber...

cs_mik67 · Answer

merci de ton aide fduchamp ....

[vb.net] Modifier un enregistrement dans un dataGrid

6 réponses

Discussions similaires