access / vb.net

Question

bonjour;
j'ai vraiment besoin de votre aide, je developpe une application pour gérer une base de données access via VB.net, à l'instant, j'ai reussi à la connecter et a programmé le bouton "Ajouter", maintenant j'ai besoin de programmer le bouton "modifier" et j'arrive pas a le faire, voila le code que j'ai écris:

 Private Sub modifier()
        Try
            Dim da As New OleDbDataAdapter
            Dim idménage As String
            idménage = DataGridView1.Item(0, DataGridView1.CurrentRow.Index).Value
            Dim reponse As Integer
            Dim sql As String

            reponse = MsgBox("voulez vous vraiment modifier le Ménage Numéro: (" + CStr(idménage) + ") ?", MsgBoxStyle.OkCancel, "Modifier")
            If reponse = MsgBoxResult.Ok Then
                con.Open()

                sql "UPDATE MENAGE SET STATUT FONCIER '" & sttfctxtbx.Text & "' WHERE ID_MENAGE= " & idtxtbx.Text

                MsgBox(sql)

                da.UpdateCommand = New OleDbCommand(sql, con)
                da.UpdateCommand.ExecuteNonQuery()

                If da.UpdateCommand.ExecuteNonQuery = 1 Then
                    MsgBox("Ménage Modifier avec succès !")
                Else
                    MsgBox("pas de modification!")
                End If

            End If
            con.Close()
                  Catch ex As Exception
            con.Close()
            MsgBox(ex.ToString, MsgBoxStyle.Critical, "Erreur")
            Exit Sub
        End Try


je pense que l'erreur et dans le syntaxe mais j'ai pas de solution.
merci pour votre aide

NHenry · Answer

Bonjour, 

Un message d'erreur ?

Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).

v----Signature--------v----------------------------------------------
[list=ordered][*]Pour poser correctement une question et optimiser vos chances d'obtenir des réponses, pensez à lire le règlement CS, celui-ci pour bien poser votre question ou encore celui-ci pour les PFE et autres exercices.[*]Quand vous postez un code, merci d'utiliser la coloration syntaxique (3ième icône en partant de la droite : ).[*]En VB.NET pensez à activer Option Explicit et Option Strict (propriété du projet) et à retirer l'import automatique de l'espace de nom Microsoft.VisualBasic (onglet Références dans les propriétés du projet).[*]Si votre problème est résolu (et uniquement si c'est le cas), pensez à mettre "Réponse acceptée" sur le ou les messages qui vous ont aidés/list
---

Access / vb.net

1 réponse

Votre réponse

Discussions similaires