xmlreader

22/07/2004 - 16:55 por Xavier Valdés | Informe spam
Hola a todos, estoy intentando leer el archivo siguiente tipo XML con el
xmlreader:
<?xml version="1.0" standalone="yes"?>
<!DOCTYPE Config SYSTEM "E:\Documents and
Settings\vald_xav\Escritorio\config.xml">
<!--Configuració de la llibreria ADA-->
<Players>
<Player1 Nom="Reproductor #1">
<Renderer>DirectSound: Digigram VX442 1/2</Renderer>
<PFL>DirectSound: Digigram VX442 3/4</PFL>
<Status>2</Status>
<Mode>1</Mode>
</Player1>
</Players>

Esto lo hago con la siguiente cadena:
Dim xRdr As New XmlTextReader(dlgLoad.FileName)
xRdr.WhitespaceHandling = WhitespaceHandling.None

'xRdr.MoveToContent()

xRdr.MoveToFirstAttribute()

While xRdr.Read

MsgBox(xRdr.Name() & "-" & xRdr.Value())

xRdr.MoveToNextAttribute()

End While

Bien, pues resulta que si descomento el movetocontent me da systemerror y
si no, al leer la cabecera del archivo (al siguiente atributo) me da error!
Qué hago mal?!?!?!

Muchas gracias,

Xavier
 

Leer las respuestas

#1 Misael Monterroca
22/07/2004 - 18:01 | Informe spam
Prueba asi en pseudocodigo


Dim xRdr As New XmlTextReader(dlgLoad.FileName)
xRdr.WhitespaceHandling = WhitespaceHandling.None

While xRdr.MoveToContent() = XmlNodeType.Element

xRdr.MoveToFirstAttribute()
dim x as boolean = true
While xRdr.Read

MsgBox(xRdr.Name() & "-" & xRdr.Value())
x = xRdr.MoveToNextAttribute()
end while

End While

Saludos!
http://cacho.zapto.org/blog




"Xavier Valdés" wrote in message
news:e4PX$w$
Hola a todos, estoy intentando leer el archivo siguiente tipo XML con el
xmlreader:
<?xml version="1.0" standalone="yes"?>
<!DOCTYPE Config SYSTEM "E:\Documents and
Settings\vald_xav\Escritorio\config.xml">
<!--Configuració de la llibreria ADA-->
<Players>
<Player1 Nom="Reproductor #1">
<Renderer>DirectSound: Digigram VX442 1/2</Renderer>
<PFL>DirectSound: Digigram VX442 3/4</PFL>
<Status>2</Status>
<Mode>1</Mode>
</Player1>
</Players>

Esto lo hago con la siguiente cadena:
Dim xRdr As New XmlTextReader(dlgLoad.FileName)
xRdr.WhitespaceHandling = WhitespaceHandling.None

'xRdr.MoveToContent()

xRdr.MoveToFirstAttribute()

While xRdr.Read

MsgBox(xRdr.Name() & "-" & xRdr.Value())

xRdr.MoveToNextAttribute()

End While

Bien, pues resulta que si descomento el movetocontent me da systemerror y
si no, al leer la cabecera del archivo (al siguiente atributo) me da


error!
Qué hago mal?!?!?!

Muchas gracias,

Xavier


Preguntas similares