[vb.net][xml] probleme de lecture de fichier

Version imprimable

27/07/2005, 10h21
graphicsxp

[vb.net][xml] probleme de lecture de fichier

Bonjour,

Je ne suis pas tres familier avec la lecture de fichiers xml, mais pourtant je pense avoir suivis la bonne demarche (mais ca ne marche pas sinon je ne serais pas en train d'ecrire ce post :wink: )
J'ai le fichier xml suivant :

<?xml version="1.0" encoding="utf-8" ?>
<ToolTip>
<table tag="some explanations about tables"/>
<view tag="some explanations about views"/>
</ToolTip>

et avec ce code j'essaye de lire un node:

Public Function LoadToolTip(ByVal Form As String, ByVal Tag As String)
As String
Dim xDoc As New XmlDocument
Try
Dim filePath As String = "../ToolTips/" & Form & ".xml"
xDoc.Load(filePath)
Dim xNodeList As XmlNodeList = xDoc.SelectNodes("/ToolTip/"
& Tag & "/@tag")
Return xNodeList.Item(0).Value
Catch ex As Exception
MsgBox(ex.ToString)
End Try
end function

mais xnodelist est toujours vide. Qu'est ce qui ne va pas ?

Merci

est ce que tu utilise un openfiledialog ?
et comment tu crée ton fichier xml, car moi j'utilise ceci
pour ecrire

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
  Dim xmlTextWriter As XmlTextWriter
        Try
 
            xmlTextWriter = New XmlTextWriter(SaveFileDialog1.FileName, System.Text.Encoding.UTF8)
            xmlTextWriter.Formatting = System.Xml.Formatting.Indented
            xmlTextWriter.Indentation = 2
            xmlTextWriter.WriteStartDocument()
            xmlTextWriter.WriteComment("création Fichier XML")
            xmlTextWriter.WriteStartElement("textbox1", TextBox1.Text)
 xmlTextWriter.WriteEndElement()
            xmlTextWriter.Flush()
            xmlTextWriter.Close()
        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try
        End If

et pour lire

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
 
        If MessageBox.Show(Me, "charger document?", "ouvrir", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = DialogResult.No Then
            Return
        End If
        OpenFileDialog1.Title = "ouvrir"
        OpenFileDialog1.DefaultExt = "mxl"
 
 
 
        If OpenFileDialog1.ShowDialog(Me) = DialogResult.OK Then
  Dim reader As XmlTextReader = New XmlTextReader(OpenFileDialog1.OpenFile)
 
            While reader.Read()
 
                If reader.NodeType AndAlso reader.Name = "textbox1" Then
                    Me.TextBox1.Text = reader.ReadString()
                End If
 
            End While
            reader.Close()
 
            OpenFileDialog1.OpenFile()
 
        End If

cela me permet de remettre le contenu de mon textbox
je sais pas si cela peut t'aider
@+

27/07/2005, 10h58
graphicsxp

En fait je n'ai pas l'intention d'ecrire dans le fichier. Et je ne veux pas utiliser un openfiledialog non plus. Je souhaite seulement trouver le node passé en parametre a ma fonction, lire sa valeur et la retourner.

J'ai change mon fichier :

<tooltip>
<Table>some explanations about tables</Table>
<View> some explanations about views </View>
</tooltip>

et ma facon d'aborder le probleme :

Code:

Dim Node As XmlElement = CType(xDoc.DocumentElement.SelectSingleNode("/tooltip/" & Tag), XmlElement)

xDoc est mon document (ouvert correctement), mais a chaque fois Node.Value est nothing :cry: Ca m'enerve car je ne vois pas ce qui cloche :?:

Bonjour,

Exemple (en C#):

Code:

1
2
3
4
5
6
7
8
9
10
11
12
 
....
XmlNode node = doc.SelectSingleNode(@"/ToolTip/table/@tag");
if (node != null)MessageBox.Show(node.Value);
....
 
OU BIEN
 
...
XmlNode node1 = doc.SelectSingleNode(@"/ToolTip/table");
if (node != null)MessageBox.Show(node1.Attributes["tag"].Value);
...

27/07/2005, 11h51
graphicsxp

:trouve:
Ben non justement c'est pas .Value qu'il faut utiliser mais .InnerText :wink: