Sujet Précédent Sujet Suivant

Enregistrer les données des champs winforms dans une base access

K09N Messages postés 1 Date d'inscription lundi 26 août 2013 Statut Membre Dernière intervention 26 août 2013 - Modifié par BunoCS le 26/08/2013 à 17:00
scn68100 Messages postés 153 Date d'inscription dimanche 27 août 2006 Statut Membre Dernière intervention 26 décembre 2019 - 27 août 2013 à 09:16
bonjour à tous
Je suis un débutant en vb. j'ai fait une application vb et je voudrais enregistrer les champs (textbox) de ma form dans ma base de donnée access. j'ai fait un code qui affiche le message d'erreur suivant: "enregistrement non effectué: la référence d'objet n'est pas définie à une instance de référencement"
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        conn = "provider = Microsoft.ACE.OLEDB.12.0 ; data source = " & Application.StartupPath & "\New BD.accdb"
        cnx = New OleDbConnection
        cnx.ConnectionString = conn
        cnx.Open()
        sql = "insert into DECRIRE values ('" & TextBox1.Text & "','" & TextBox2.Text & "'," & TextBox3.Text & ")"
        Try
            dta.InsertCommand = New OleDbCommand(sql, cnx)
            ' on cree un enregistrement vierge
            dtr = dts.Tables("DECRIRE").NewRow()
            'on affecte les champs saisis aux différentes
 
            dtr("Code_util") = TextBox1.Text
            dtr("Nom_site") = TextBox2.Text
            dtr("Description") = Integer.Parse(TextBox3.Text)
            'on associe la ligne à la table du dataset
            dts.Tables("DECRIRE").Rows.Add(dtr)
            'on effectue la mise à jour dans la base
            dta.Update(dts, "DECRIRE")
            MessageBox.Show("enregistrement effectué")
            TextBox1.Text = ""
            TextBox2.Text = ""
            TextBox3.Text = ""
            TextBox1.Focus()
        Catch ex As Exception
            MessageBox.Show("enregistrement non effectué: " + ex.Message)
        End Try

1 réponse

Réponse 1 / 1
scn68100 Messages postés 153 Date d'inscription dimanche 27 août 2006 Statut Membre Dernière intervention 26 décembre 2019
27 août 2013 à 09:16
Bonjour,
Je n'ai pas analysé le code, mais au premier coup d'oeil je pense qu'il y a "mélange" entre le 
sql = "insert into

et 
dtr("Code_util") = TextBox1.Text

Surement deux méthodes d'écriture "Mélangée"
SC
0

Discussions similaires

utiliser des control creer sous winforms en WPF
cs_Mimo11 -
sofienjustdoit -

16 réponses
ACCESS - Gestion du personnel
pianuse -
chabbiimen -

7 réponses
Prob de Restauration base de données
cindyb -
Orange -

3 réponses
Inscription d'un formulaire dans la base données
cmoimath -
cmoimath -

12 réponses
conception base de données e-commerce
av -
f0xi -

4 réponses
Rejoignez-nous