ciao a tutti,
ecco qua il mio problema: ho creato un file xml con il seguente schema:

<Work>
<Pratica N="1">

<Val_1>valore1_1</Val_1>
<Val_2>valore2_1</Val_2>

</Pratica>
<Pratica N="2">

<Val_1>valore1_2</Val_1>
<Val_2>valore2_2</Val_2>

</Pratica>
</Work>

quello che voglio fare è caricare tramite un modulo i dati, e salvarli in un database...
(è una funzione Importa Dati)
il codice è il seguente:

Dim objDom As DOMDocument
Dim objElem As IXMLDOMElement
Dim objName As IXMLDOMNodeList

objDom = New DOMDocument

objDom.async = False
objDom.load("load.xml")

objElem = objDom.documentElement

' objElem.selectNodes("Pratica").length sono il numero di tag: "pratica" che ci sono...
For i As Integer = 1 To objElem.selectNodes("Pratica").length

objName = objElem.selectNodes("Pratica/Val_1")
For Each objNode In objName
MsgBox(objNode.text & vbCrLf)
Exit For
Next
objName = objElem.selectNodes("Pratica/Val_2")
For Each objNode In objName
MsgBox(objNode.text & vbCrLf)
Exit For
Next
Next

solamente che facendo cosi... mi restituisce SEMPRE i primi risultati...
quindi nell'esempio: valore1_1; valore1_2

non ho la minima idea di come fare per caricare tutti gli altri dati....
qualcuno può aiutarmi?