[bighunter]

como crear un archivo xml desde vb 2005

Dim arbol As New XmlDocument
Dim nodo As XmlNode
Dim a As String
Dim Arr(0 To 3) As String
Arr(0) = "hola"
Arr(1) = "mundo"
Arr(2) = "adios"
Arr(3) = "mundo"
nodo = arbol.CreateElement("Sites")
arbol.AppendChild(nodo)
For Each a In Arr
'Arr es un array con los elementos a poner en el xml
nodo = arbol.CreateElement("value")
nodo.InnerText = a.ToString
arbol.DocumentElement.AppendChild(nodo)
Next
arbol.Save("C:\Fichero.xml")