Test Foro de elhacker.net SMF 2.1

Hola. Había encontrado un ejemplo que permitía guardar lo introducido en unos TextBox en XML como una base de datos, y posteriormente poder leerlos, pero ahora mismo no se donde encontrarlo. Agradecería algún ejemplo.

Gracias de antemano.

Bien, he creado un sencillo ejemplo sobre cómo crear un archivo XML:
Imports System.Xml

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Doc As New XmlDocument, Nodo As XmlNode

        Dim Lista As ArrayList = New ArrayList()

        Lista.Add("Mace Windu")
        Lista.Add("Kamui")
        Lista.Add("Chipbios")
        Lista.Add("Vengador de las Sombras")

        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 & "\FoSTeaM.xml")
    End Sub
End Class

Y aquí para leer el archivo que creamos anteriormente:
Imports System.Xml

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim Doc As New XmlDocument, ListaNodos As XmlNodeList, Nodo As XmlNode
        Dim Lista As ArrayList = New ArrayList()

        Doc.Load(Application.StartupPath & "\FoSTeaM.xml")

        ListaNodos = Doc.SelectNodes("/Equipo/Miembro")

        For Each Nodo In ListaNodos
            Lista.Add(Nodo.ChildNodes.Item(0).InnerText)
        Next
    End Sub
End Class

Salu2

Muchas gracias, me sirve igualmente.

Saludos  ;)

Cita de: aaronduran2 en 11 Enero 2009, 21:06 PM
Muchas gracias, me sirve igualmente.

Saludos  ;)

Me alegra que te sirviera.

Salu2