DataTable différent de Dataset.Tables ?

Bonjour bonjour!

Voila, j'ai des problèmes de datatable... Voici les cas:

Ca, ca marche:

Code:

---

1 2 3 4 5 6

Dim d1 as new datatable Ajoute_ligne (d1)   Private Sub Ajoute_ligne (ByRef dt as DataTable) dt.rows.Add("Salut","Salut") End Sub

---

Ca marche puisque après l'appel de la procédure, les lignes sont présentent.


Ca, Ca marche pas:

Code:

---

1 2 3

Dim ds as new DataSet ds.Tables.Add("d1") Ajoute_ligne (ds.Tables("d1"))

---

Après l'appel de la procédure, la table est vide.

------

Ca ca marche:

Code:

---

1 2	Dim dt as new datatable dt = DS.Tables(0).Clone

---

Ca, Ca marche pas:

Code:

---

1 2 3

Dim ds as new dataset ds.Add("d1") ds.Tables("d1") = DS.Tables(0).Clone

---

Ca me souligne la dernière ligne avec l'erreur:

Citation:

---

La propriété Item est ReadOnly.

---

Si quelqu'un pouvait m'éclairer... Merci d'avance

Bon et bien j'ai trouver une solution, qui ne me plais pas trop.

Au lieu d'avoir 8 Datatable dans mon Dataset, j'ai maintenant 8 Datasets.

Car les passages par references et les clones fonctionnent parfaitement.

Je laisse ce post encore un peu, si quelqu'un pouvait éclaircir ce sujet.

:aie:

ici tu passe une chaine de caractère à ton dataset

Code:

---

ds.Tables.Add("d1")

---

met ce code à la place

Code:

---

ds.Tables.Add(d1)

---

je te renvoi à ce post avec un problème semblable

Quand je faisais:

Code:

---

ds.Tables.Add("Table1")

---

C'était pour créer une table dans le dataset qui s'appelle Table1, puis j'essayais de copier le schema.

En prenant ta solution, ça sous-entend qu'il faut créer la datatable localement, puis l'ajouter au dataset?

Genre:

Code:

---

1 2 3 4

Dim ds as new dataset dim dt as new datatable dt = Me.AutreDataset.Tables(0).Clone ds.Tables.Add(dt)

---

Parce que je trouvais de l'intérêt a ne pas créer localement toute mes datatables... pour les ajouter une a une... Tout ça juste pour copier le schéma.

D'aileurs le problème est le même. Même avec cette solution, on ne peut pas créer directement une datatable dans le dataset et copié un clone dedans.

Mais ca reglerai le problème de clonage en effet.

Par contre pour le passage par référence reste un problème. Car pour identifié une table dans un dataset il faut soit mettre son nom en String soit son numéro... Et cela ne semble pas marché.

la collection tables de l'objet dataset est en lecture seul (readonly)
tu peut tres bien récupérer ta datatable dans une variable et faire toutes les modifications voulu, la table dans le dataset changera automatiquement

modifier ce code

Code:

---

1 2 3 4

Dim ds as new dataset ds.Add("d1") ds.Tables("d1") = DS.Tables(0).Clone

---

et mettre à la place

Code:

---

1 2 3 4 5

Dim ds as new dataset dim dt as datatable dt=ds.Add("d1") dt = DS.Tables(0).Clone

---

dt est juste une référence sur la table

Code:

---

ds.Tables("d1")

---

les changements sur la structure ou sur les données de dt seront en fait repercuté directement sur la table "d1" du dataset

donc il n'y a pas de problème pour le passage par reference

Code:

---

Ajoute_ligne (dt))

---

pour le clonage des datatable remplacer le code

Code:

---

1 2 3 4

Dim ds as new dataset ds.Add("d1") ds.Tables("d1") = DS.Tables(0).Clone

---

par celui là:

Code:

---

1 2 3

Dim ds as new dataset ds.Tables(DS.Tables(0).Clone())

---

mais si tu veut cloner une dataset vers une autre tu pouvait simplement faire:

Code:

---

1 2	Dim ds As DataSet = DSorigine.Clone()

---

puis te débarrasser des tables en plus avec la méthode remove de la collection tables

Merci pour ces astuces !!