Save datagridview to xml

Bonjour,

J'aimerais bien sauvegarder un datagridview dans un fichier xml. Je n'ai pas de problème pour l'importer depuis un fichier xml vers le datagridview, mais lorsque je fais l'inverse, ça ne fonctionne pas. :?

Code:

---

1 2 3 4 5 6 7

Private Sub loadGrid() Dim ds As DataSet = New DataSet ds.ReadXml("C:\x\tsst.xml") Dim dv As DataView = New DataView(ds.Tables(0)) mainGrid.DataSource = dv End Sub

---

Pourquoi ce n'est pas possible de remplacer tous les Read par Write ?!

Le but est de reproduire cette petite application (sauf que je ne parviens pas à ouvrir l'intégralité de son code source :aie:)


Merci d'avance.

Bonjour,

Je ne comprends pas ton problème...la méthode WriteXml existe sur l'objet Dataset...

Voir MSDN

Hello,

J'ai essayé de faire un WriteXml, mais je ne suis pas sûr d'avoir fait juste, en tout cas, dans mon fichier xml, il n'y a qu'un <NewDataSet />

Code:

---

1 2 3 4 5 6 7

Private Sub Button1_Click() Dim ds As DataSet = New DataSet ds.WriteXml("C:\users\film.xml") Dim dv As DataView = New DataView(ds.Tables(0)) DataGridView1.DataSource = dv End Sub

---

Et lorsque je clique sur le Button1, L'erreur suivante apparaît sur le New DataView :

Citation:

---

L'exception IndexOutOfRangeException n'a pas été gérée !
Impossible de trouver la table 1.

---

C'est tout bon,

À force de chercher sur google comment sauver un datagridview dans un fichier xml, j'ai trouvé un super site qui explique tout en détail :ccool:

http://www.v-basic.net/2011/04/xml-i...nd-export.html

Merci quand même ! ;) :P ;)

Salut,

Si je peux me permettre une modif sur ton bout de code. L'instruction pour "enregistrer sous" est pour un fichier texte :

Code:

---

1 2 3 4

Dim savefile As New SaveFileDialog savefile.FileName = "" savefile.Filter = "Fichier Text (*.txt)|*.txt" savefile.ShowDialog()

---

Donc pour ton fichier xml :

Code:

---

1 2 3 4

Dim savefile As New SaveFileDialog savefile.FileName = "" savefile.Filter = "Fichier Text (*.xml)|*.xml" savefile.ShowDialog()

---

Lorsque tu changes de dossier ou ton dossier est supprimer ça ne marche plus par contre ça ça marche pour tout les cas.;)

Ok, merci, j'y penserai.

Mais en fait, j'ai toujours un petit problème, avec la solution que j'ai trouvé, je suis obligé d'ouvrir un fichier Xml avant de l'enregistrer. Je ne peux pas l'enregistrer directement...

En résumé, dans cet example,

http://www.v-basic.net/2011/04/xml-i...nd-export.html

tu ne peux pas cliquer directement sur Save XML File.

Est-ce que quelqu'un a une idée ?

Bonjour,
en appliquant la source de ton premier message :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Private filePath As String = My.Application.Info.DirectoryPath & "\user.xml" 'xml filepath   Private Sub btnSave_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnSave.Click Dim dt As New DataTable   Me.DgvMstUser.EndEdit() dt = Me.DgvMstUser.DataSource   Try dt.WriteXml(filePath) MsgBox("Data has been saved.") Catch ex As Exception MsgBox("Data cannot be saved.") End Try End Sub

---