Discussion :

[jamy69]

Bonjour,

J'ai un fichier XML sur lequel je souhaiterai récupérer une valeur dans une variable.
Le fichier est en pièce jointe.
Je souhaiterai récupérer la valeur de ID dans la balise HardwareID.

Pouvez vous m'aider svp ?

Merci beaucoup !

[ProgElecT]

Salut

Comment accéder aux valeurs d'un noeud par le nom de balise ?
Je pense que cela répond à ta question.

[ProgElecT]

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
Option Explicit
 
Dim xmlDoc, xmlAttrib, StrID
 
Set xmlDoc = CreateObject("Microsoft.XMLDOM")
xmlDoc.async = "false" ' permet de charger entièrement le document en mémoire avant le traitement
xmlDoc.Load ("C:\Users\francis\Downloads\sephwid.xml")
Set xmlAttrib = xmlDoc.getElementsByTagName("HardwareID")
StrID = xmlAttrib(0).Attributes(0).nodeValue
MsgBox StrID
Set xmlAttrib = Nothing
Set xmlDoc = Nothing

J'aurai préféré te proposer un GET("ID"), mais je ne sais pas faire.

Motif de l'édit:
A la place des lignes 9 et 10

Code :

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

1
2
3
4
5
6
StrID = xmlAttrib(0).getAttribute("ID")
MsgBox StrID
StrID = xmlAttrib(0).getAttribute("LastUsedTime")
MsgBox StrID
StrID = xmlAttrib(0).getAttribute("CreationTime")
MsgBox StrID

[jamy69]

Merci de ta réponse !