Save Multiple Datagridview dans un fichier xml

toutela - 26 sept. 2013 à 21:46
 Utilisateur anonyme - 27 sept. 2013 à 20:15
Bonjour

Je suis débutant et pour apprendre , j'ai navigué sur plusieurs forum mais sans résulat pour moi

Dans mon application, j'ai créer un tabcontrol avec plusieurs onglets

Dans chaque onglet j'ai mis un datagridview pour saisir mes données(datagridview1, datagridview2, datagridview3, etc..

J'arrive avec cette fontion à remplir mes tables

Dim open_file As New OpenFileDialog

open_file.Filter = "Files (*.xml) | *.xml"

Try

If open_file.ShowDialog() = DialogResult.OK Then

Dim xmlFile As XmlReader

xmlFile = XmlReader.Create(open_file.FileName, New XmlReaderSettings())

Dim ds As New DataSet

ds.ReadXml(xmlFile)

DataGridView1.DataSource = ds.Tables("TabPages1")
DataGridView2.DataSource = ds.Tables("TabPages2")
DataGridView3.DataSource = ds.Tables("TabPages3")
etc...

End If


Catch ex As Exception

'if any problem show error
MsgBox(ex.Message)

End Try

Mon Problème,

Apres de nombreuses recherche je n'arrive pas à additionner mes tables pour enregistrer dans un seul fichier XML

je suis parti sur cette base

Dim save_file As New SaveFileDialog

save_file.Filter = "xml files (*.xml)|*.xml|All files (*.*)|*.*"

save_file.FilterIndex = 2

Dim my_datatable As New DataTable
If save_file.ShowDialog() = DialogResult.OK Then

my_datatable = CType(DataGridView1.DataSource, DataTable)
'my_datatable = CType(DataGridView2.DataSource, DataTable)
'my_datatable = CType(DataGridView3.DataSource, DataTable)

my_datatable.WriteXml(save_file.FileName)

End If

Si une personne comprend mon problème, je suis preneur de conseil

Cordialement
Joël

1 réponse

Utilisateur anonyme
27 sept. 2013 à 20:15
Salut,

"j'ai navigué sur plusieurs forum mais sans résulat"
Navigue plutôt sur msdn, c'est plus sûr.

Sinon, place ton code entre les balises de code et reformule ta question qui n'est pas claire du tout.

Merci et bonne soirée.
0
Rejoignez-nous