Discussion :

[edwinzap]

Bonjour,
Voici mon problème:
Je voudrais créer un nouvel enregistrement dans ma datable.
La méthode suivante fonctionne partiellement:

Code :

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

1
2
3
4
5
6
 
                Dim row as datarow
                row = ds.Tables("T_chant").NewRow
                ds.Tables("T_chant").Rows.Add(row)
 
                chant_databinding.MoveLast()

En effet mon dataset "ds" se remplit à partir d'une table ("T_chant") qui contient un champ clé primaire "Ref"
Or lors de l'ajout d'une nouvelle ligne, le champ clé primaire est vide.

De même avec ma table enfant "T_Paroles", lorsque j'ajoute un enregistrement grâce au bouton prévu à cet effet sur le bindingnavigator, le champ clé primaire de cette table est également vide. De plus, la table T_chant et T_paroles sont liées par le champ "Ref" (T_chant) = "n°" (T_Paroles)
Or lors de l'ajout d'un enregistrement dans la table T_paroles, le champ "n°" ne se remplit pas automatiquement avec le même numéro que le champ "ref" de T_chant.

J'espère que vous comprendrez et pourrez m'aider !

[Cricri1670]

Bonjour,

Si j'ai bien compris, ta clef primaire est une valeur auto-incrémentée ?

Dans ce cas, il faut que tu regardes bien dans ton DataSet que ce champ est correctement configuré. De plus, c'est ta base de données qui va attribuer la valeur, donc tu dois rafraichir ton DataSet après l'insertion de ta ligne pour récupérer la valeur attribuée.

Le clefs auto-incrémentées ne sont pas facile à gérer. Je te conseille le PDF suivant http://dotnet.developpez.com/cours/ado.net/

Bon courage !

[edwinzap]

Merci de la réponse.
J'ai réussi à avoir qqchose de +- correct
Sur click du bouton ajouter, je mets le code suivant:

Code :

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

1
2
3
4
5
                chant_databinding.AddNew()
                chant_databinding.MoveLast()
 
                Paroles_databinding.AddNew()
                Paroles_databinding.MoveLast()

Sur click du bouton enregistrer, je mets le code suivant:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
            chant_databinding.EndEdit()
            Paroles_databinding.EndEdit()
 
            cmdBuilder = New OleDbCommandBuilder(da_chant)
            da_chant.Update(ds, "T_chant")
            ds.Clear()
            da_chant.Fill(ds, "T_chant")
 
            cmdBuilder = New OleDbCommandBuilder(da_paroles)
            da_paroles.Update(ds, "T_paroles")
            ds.Clear()
            da_paroles.Fill(ds, "T_Paroles")

Pour la table parent T_Chant, cela fonctionne sans problème, l'update se fait correctement.
Mais pour la table enfant T_paroles, j'ai une erreur de contrainte:
"System.Data.ConstraintException: Impossible d'activer les contraintes. Une ou plusieurs lignes contiennent des valeurs qui violent les contraintes de type non null, unique ou de clé externe.
à System.Data.DataSet.EnableConstraints()
à System.Data.DataSet.set_EnforceConstraints(Boolean value)
à System.Data.DataTable.EndLoadData()
à System.Data.Common.DataAdapter.FillFromReader(DataSet dataset, DataTable datatable, String srcTable, DataReaderContainer dataReader, Int32 startRecord, Int32 maxRecords, DataColumn parentChapterColumn, Object parentChapterValue)
à System.Data.Common.DataAdapter.Fill(DataSet dataSet, String srcTable, IDataReader dataReader, Int32 startRecord, Int32 maxRecords)
à System.Data.Common.DbDataAdapter.FillInternal(DataSet dataset, DataTable[] datatables, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
à System.Data.Common.DbDataAdapter.Fill(DataSet dataSet, Int32 startRecord, Int32 maxRecords, String srcTable, IDbCommand command, CommandBehavior behavior)
à System.Data.Common.DbDataAdapter.Fill(DataSet dataSet, String srcTable)
à VisioSong.Form1.Enregistrer_Click(Object sender, EventArgs e) dans F:\Mes Documents\Visual Studio 2012\Projects\VisioSong - Copie\VisioSong\Form1.vb:ligne 213"

Et plus spécifiquement, en récupérant le datarow.rowerror:
"ForeignKeyConstraint relation a besoin des valeurs de clé enfant (1) dans la table parente."

Dès lors, comment faire un UPDATE correct sur deux tables liées???

En attendant, je vais regarder le lien que vous m'avez mis ! ^^

[edwinzap]

PS: je n'arrive pas à télécharger le cours: "310 login incorrect"
Pourtant j'utilise mon nom d'utilisateur et mot de passe.
Pq ça ne va pas???

[edwinzap]

J'ai réussi à faire ce code et cette fois il n'y a plus d'erreur:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
            chant_databinding.EndEdit()
            Paroles_databinding.EndEdit()
 
            Dim cb_chant As New OleDbCommandBuilder(da_chant)
            Dim cb_paroles As New OleDbCommandBuilder(da_paroles)
            da_chant.Update(ds, "T_chant")
            da_paroles.Update(ds, "T_paroles")
 
            ds.Clear()
            da_chant.Fill(ds, "T_chant")
            da_paroles.Fill(ds, "T_Paroles")

Mais la table enfant "T_paroles" ne se remplit pas correctement !
Après l'update, il n'y a que le champ clef primaire remplit !

QQn a une solution??