Con cosa stai leggendo il file?

Marco.

Se l'errore ti viene alzato qundo chiami il load del file ti consiglio di verificare l'errore interroganodo le proprietà objXML.parseError.reason e objXML.parseError.errorCode dell'oggetto XMLDOM.

Se invece l'errore è generato dal tuo codice direi che potrebbe essere sufficiente aggiungere il controllo che il nodo <allegato> ci sia o meno.

Comunque, se l'XML è semplice come quello che hai postato, io preferisco "puntare" il valore dei nodi direttamente con: getElementsByTagName("[tagname]") se la lista di nodi contiene almeno un elemento ne ottengo il valore.

In questo caso il controllo è abbastanza semplice.

Ciao, Marco.

Perfetto, allora invece che valorizzare sei variabili potresti riempire un array.

In VBScript:


Alla fine tutto quello che devi fare con gli allegati lo fai in un ciclo di for sull'array.

Marco.

P.S. Verifica il codice VBScript è un bel pò che non lo uso....

Grazie, per le risposte ho risolto in un altro modo.

Praticamente questo è il codice:

Set fotoallegate = objXmlDom.getElementsByTagName("file_allegati")
if Not fotoallegate(i).text = "" Then
Set fotoallegate1 = objXmlDom.getElementsByTagName
("file_allegati/allegato/file_path")

Dim h
h = 0
For h = 0 To fotoallegate1.length - 1
If h = "0" Then
Set foto1 = objXmlDom.getElementsByTagName
("file_allegati/allegato/file_path")
foto1 = foto1(h).text
End If
If h = "1" Then
Set foto2 = objXmlDom.getElementsByTagName
("file_allegati/allegato/file_path")
foto2 = foto2(h).text
End If
.
.
.
If h = "6" Then
Set foto3 = objXmlDom.getElementsByTagName
("file_allegati/allegato/file_path")
foto3 = foto3(h).text
End If
Next

Questa è un'alternativa un pò pesantina a livello di codice, ma credo che nel mio caso sia abbastanza efficace.
In questo caso carico solo l'effettivo numero, ma non più di 6 allegati che si trovato all'interno del file xml.