Discussion :

[m.greg13]

Bonjour a tous, voila j'ai sur un mon programme besoin de lire des fichiers XML dont la structure est fixe mais particulière

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<test>
	<sec1>
		<info name="test" url="http://www.developpez.net" />
		<info2> d: </info2>
	</sec1>
</test>

Dans le cas d'une structure simple " <info2> d: </info2> " aucun problème pour lire l'information mais dans le cas de
la première ligne je ne trouve pas comment le lire d'autant que j'ai plusieurs information a lire ...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
Dim MonXML As XDocument = XDocument.Load("E:\test.xml")
 
        MsgBox(MonXML.<test>.<sec1>.<info2>.Value())
        MsgBox(MonXML.<test>.<sec1>.<info1>.Value())

Merci d'avance pour votre aide
Bye

[calagan99]

Les "éléments" dont tu parles sont des attributs de tes noeuds.
Tu peux récupérer le contenu de ces attributs en utilisant la fonction Attributede ton XElement.

Plus d'infos sur le MSDN

[m.greg13]

Salut, merci pour l'information

Par contre je comprend pas comment l'utiliser car j'ouvre avec XDocument j'ai donc tester :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
Dim MonXML As XDocument = XDocument.Load("E:\xml.xml")
        MsgBox(MonXML.<test>.<sec1>.<info1>.Attributes("name"))

mais ça me repond :

L'argument 'Prompt' ne peut pas être converti en type 'String'.

J'ai essayer d'ouvrir mon fichier avec XElement mais ça ne marche pas non plus, j'ai essayer avec le "Dim att As XAttribute" de MSDN mais aucune resultat

[calagan99]

Décris plus précisément ce que tu veux faire de ce XML:
- le parcourir pour stocker tous ces éléments dans une collection d'objets ?
- trouver un noeud en particulier ?

Sans cela, difficile de te répondre.

[m.greg13]

Je connais d'avance la structure donc pas besoin de chercher, ce que je veut c'est juste lire les différente variable dans différent XML des fois entre <> </> ( qui ne pose pas de problème ) et d'autre < blabla="bla" /> ( qui eux prose problème ...

Les variables vont toute être stocké dans une structure de string être afficher dans une textbox et pourront être modifier par l'utilisateur ( l'l’écriture sera dans une autre Function ( on verra plus tard XD )


Mercii :>

[chrismonoye]

Bonjour,

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MonXML.<test>.<sec1>.<info1>.Attributes("name")

Retourne une collection filtrée des attributs de chaque élément de la collection source. Seuls les éléments avec un XName correspondant sont inclus dans la collection. (Dixit MSDN).
Une collection ne peut pas être convertie en type 'String', On peut accéder à ce qu'elle contient par un For Each :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
        '*** IEnumerable(Of XAttribute) de XElement qui contient la collection source.
        Dim attList As IEnumerable(Of XAttribute) = MonXML.<test>.<sec1>.<info1>.Attributes()
        For Each att In attList
            MsgBox(att)
        Next

Si il s'agit d'un élément bien précis, le plus simple est de suivre les conseils de calagan99, genre :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

MsgBox(MonXML.<test>.<sec1>.<info1>.FirstOrDefault.Attribute("name"))