Discussion :

[amirad]

bonjour;

J'essaie d'ajouter / modifier des enregistrements dans un DataGridView en VB.Net. L'ajout / modification s'effectuent au niveau du DGV, aussi au niveau de la BD.
Cependant, lorsque je ferme l'application et je la relance, mes ajouts / modifications ne sont pas sauvegardées, je retrouve mes anciennes données.

[Philippe Vialatte]

Salut,

comment fais-tu pour ajouter les donnees a la base ?

[amirad]

Salut,

comment fais-tu pour ajouter les donnees a la base ?

Salut,

Voilà mon code d'ajout:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
 
 
 cmdInsert.CommandType = CommandType.Text
 cmdInsert.CommandText = "insert into Fiche values('" & txtcod.Text & "','" & txtno.Text & "','" & txtfoct.Text & "', '" & Txtbas.Text & "' )"
cmdInsert.Connection() = maConnexion 
cmdInsert.ExecuteNonQuery()
cnx.Close()
MessageBox.show("Enregistrement ajouté correctement")

[Philippe Vialatte]

Alors, question bete, mais :
- est-ce que le code est atteint (en mode debug)
- si il est atteint, est-ce que la base de donnees est mise a jour ?

[amirad]

Alors, question bete, mais :
- est-ce que le code est atteint (en mode debug)
- si il est atteint, est-ce que la base de donnees est mise a jour ?

Oui le code est atteint.
La BD est mise à jour aussi. Le problème est que lorsque je relance une seconde fois l'exécution de l'application, je ne trouve plus mes données insérées.

[julien_iz]

Le problème est que lorsque je relance une seconde fois l'exécution de l'application, je ne trouve plus mes données insérées

Verifie directement dans la BDD si les donnees y sont, c'est peut etre la recuperation des donnees qui rate ;-)

[amirad]

Le problème est que lorsque je relance une seconde fois l'exécution de l'application, je ne trouve plus mes données insérées

Verifie directement dans la BDD si les donnees y sont, c'est peut etre la recuperation des donnees qui rate ;-)

Les données y sont après l'ajout mais elles n'y sont plus après une deuxième exécution.

[Pol63]

un dataset quequepart ?

[amirad]

un dataset quequepart ?

Dans le load de la page qui contient le DGV, j'ai un DataSet.
Voilà mon code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
Try
            connect()
            sql = "select * from Fiche"
            cmd.CommandText = sql
            cmd.Connection() = maConnexion
            myDataAdapter.Fill(myDataSet, "Fiche")
            myDataTable = myDataSet.Tables("Fiche")
 
            MonDGV.DataSource = myDataTable

[amirad]

Bonjour,
Ce que j'ai remarqué que toutes mes modifications s'effectuent dans la base mais elles ne sont pas sauvegardées. En effet, tout est repris si je relance l'exécution du projet.

Pourtant, mon code est le même utilisé dans un autre projet et une autre base.

cela peut -t-il être du à la base (access) ?

[Philippe Vialatte]

Est-ce que tu utilise des transactions ?

Est-ce que ta base de donnees est en read-only ?

[mermich]

Avec un commit ca marcherai mieux...

[amirad]

Est-ce que tu utilise des transactions ?

Est-ce que ta base de donnees est en read-only ?

bonjour,
Non, j'utilise pas de transactions et ma base n'est pas read only non plus.

[mermich]

Un commit serai mieux:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 cmdInsert.CommandType = CommandType.Text
 cmdInsert.CommandText = "insert into Fiche values('" & txtcod.Text & "','" & txtno.Text & "','" & txtfoct.Text & "', '" & Txtbas.Text & "' )"
cmdInsert.Connection() = maConnexion 
cmdInsert.ExecuteNonQuery()
cmdInsert.Commit()
cnx.Close()
MessageBox.show("Enregistrement ajouté correctement")

[Pol63]

commit ne sert à rien s'il n'y a pas de transaction de démarrée ...