Leer archivo xml
Publicado por Sin nombre (1 intervención) el 14/06/2011 23:15:13
Hola estoy creando un proyecto en vb.net (especificamente en vb 2008, lo que pretendo es hacer un formulario por ejemplo con textbox o listbox(por ejemplo), osea cuando la aplicacion inicie en form_load los textbox tengan el contenido que e guardado en el xml, osea cargar los datos hasta ahora esto e hecho:
Dim Doc As New XmlDocument, Nodo As XmlNode
Dim Lista As ArrayList = New ArrayList()
Lista.Add(TextBox1.Text)'agrego al archivo xml el texto de los textbox
Lista.Add(TextBox2.Text)
Lista.Add(TextBox3.Text)
Nodo = Doc.CreateElement("Equipo")
Doc.AppendChild(Nodo)
For Each Elemento As String In Lista
Nodo = Doc.CreateElement("Miembro")
Nodo.InnerText = Elemento
Doc.DocumentElement.AppendChild(Nodo)
Next
Doc.Save(Application.StartupPath & "\textoprueba.xml")[/code]
Aqui creo el archivo xml, eso no es problema, pero no se como cargarlos en el form_load, ojala alguien sepa como darme una mano.
saludos
1
2
3
4
5
6
7
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
timer1.enabled = True
'Aqui quisiera el codigo para cargar los datos
TextBox1.Text = My.Computer.FileSystem.ReadAllText("FoSTeaM.xml")
Dim Doc As New XmlDocument, Nodo As XmlNode
Dim Lista As ArrayList = New ArrayList()
Lista.Add(TextBox1.Text)'agrego al archivo xml el texto de los textbox
Lista.Add(TextBox2.Text)
Lista.Add(TextBox3.Text)
Nodo = Doc.CreateElement("Equipo")
Doc.AppendChild(Nodo)
For Each Elemento As String In Lista
Nodo = Doc.CreateElement("Miembro")
Nodo.InnerText = Elemento
Doc.DocumentElement.AppendChild(Nodo)
Next
Doc.Save(Application.StartupPath & "\textoprueba.xml")[/code]
Aqui creo el archivo xml, eso no es problema, pero no se como cargarlos en el form_load, ojala alguien sepa como darme una mano.
saludos
Valora esta pregunta


0