Guardar y leer archivos XML en dispositivos móviles.

Un archivo XML puede ser tratado como una base de datos local en dispositivos móviles. Para esto vamos a mostrar como crear un archivo XML y llenarlo con datos. Luego como realizar la lectura del mismo.

Para crear el archivo XML, suponiendo que tenemos un dataset creado:

Dim FS As New System.IO.FileStream("windows\archivo.xml", _
System.IO.FileMode.Create)

Dim XMLTW As New System.Xml.XmlTextWriter( _
FS, System.Text.Encoding.Unicode)

' El dataset ya creado y con información. Lo guardo dentro del XMLTextWriter
DS.WriteXml(XMLTW, XmlWriteMode.WriteSchema)
XMLTW.Close()

Luego, para poder leerlo, realizamos lo siguiente:

Dim DS2 As New DataSet
Dim FS As New System.IO.FileStream("windows\archivo.xml", _
System.IO.FileMode.Open)
Dim XMLR As New System.Xml.XmlTextReader(FS)
DS2.ReadXml(XMLR, XmlReadMode.ReadSchema )
myXMLReader.Close()

Dim unaFila As DataRow
Dim i As Integer
For i = 0 To DS2.Tables("Archivo").Rows.Count - 1
unaFila = DS2.Tables("Archivo").Rows(i)
MessageBox.Show(("Archivo" & i.ToString & "= " & _ unaFila("Nombre")))
Next i