Read/Write a My XML File

[John Fred]

I have created a XML File With XmlTextWriter and the result is :

<?xml version="1.0" encoding="utf-8" standalone="yes"?>
<Configuration>
<Settings>
<DbName>DoxWork</DbName>
<PathDB>C:\Documents and Settings\v.savino\Desktop\</PathDB>
<DbServerName>Server</DbServerName>
</Settings>
</Configuration>

Use XmlTextReader for read XML File..

This is my code :

Do While XReader.Read
If XReader.NodeType = XmlNodeType.Element Then
msgbox XReader.LocalName & " " & XReader.ReadString
End If
Loop

I can approach directly the element? (ES. DbName) Without to make Loop

Thank You

[Derek Harmon]

"John Fred" <ge*@msn.com> wrote in message news:ec**************@TK2MSFTNGP11.phx.gbl...

Do While XReader.Read
If XReader.NodeType = XmlNodeType.Element Then
msgbox XReader.LocalName & " " & XReader.ReadString
End If
Loop

I can approach directly the element? (ES. DbName) Without to make Loop

Why not loop?

You can load the XML into an XmlDocument to access
the element and it's text node directly,

Dim doc As XmlDocument = New XmlDocument( )
doc.Load( XReader)
XmlElement e = CType( _
doc.DocumentElement.SelectSingleNode( _
"//DbName"), _
GetType( XmlElement) )
If ( Not ( e Is Nothing ) ) And ( e.HasChildNodes ) ) Then
MsgBox e.LocalName & " " & e.FirstChild.Value
End If

But this only hides the loop so you can't see it (it still loops inside
of the call made to Load( ) ).
Derek Harmon

[John Fred]

Thank you