Bonjour,
Je souhaiterais récupérer en cas d'erreur la valeur d'un noeud parent particulier sachant que l'erreur peut survenir sur des noeud de profondeurs différentes. Pour etre plus clair:

Le shéma de mon document XML est:
Code xml : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
<POS>
  <PO>
    <LEVEL1>
       <LEVEL2>
           <LEVEL3>
           </LEVEL3>
       </LEVEL2>
    </LEVEL1>
  </PO>
</PO>

Une erreur peut survenir sur les noeuds level1, level2 ou level3.
J'aimerai dans ces cas 'erreur recupérer la valeur du noeud <PO>

Mon code est:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
 
With objDOMParseError
			If .errorCode <> 0 Then
				Set errs = .allErrors 
				errsCount = errs.length 
				For i = 0 To errsCount - 1
					Set e = errs.Item(i)
					strXMLParseError = strXMLParseError & vbcrlf & vbcrlf &  replace("Erreur No %1, location %2", "%1", e.errorCode)
					strXMLParseError = replace(strXMLParseError, "%2", e.errorXPath)
					strXMLParseError = strXMLParseError & vbcrlf & replace("Description: %4", "%4", e.reason)
				Next
Merci