Laden einer XML-Datei aus Internet in VBA abwarten
Bo
ich lade mit VBA eine XML-Datei aus dem Internet. Das funktioniert mit
XML.Load(Dateiname)
problemlos, wobei in der Variablen Dateiname der Pfad zur Datei steht.
Gleich nach dem Laden will ich mit
UpdateVersion = XML.DocumentElement.SelectSingleNode("/Ergebnisse/UpdateVersion").Text
auf die XML-Daten zugreifen. Im Debug-Modus funktioniert auch das super. Zur Laufzeit bekomme ich jedoch den
Laufzeitfehler '91' Objektvariable oder With-Blockvariable nicht festgelegt.
Ich vermute, dass die XML-Daten noch nicht vollständig geladen sind, wenn der Folgecode darauf zugreifen will. Nun könnte ich ja eine Zeitschleife einbauen, um etwas abzuwarten. Da die Zeit zum Laden der Datei aber u.a. von der Dateigröße und der Übertragungsgeschwindigkeit des Netzes abhängig ist und beide Größen sehr variabel sind, finde ich den Gedanken mit einer festen Wartezeit nicht so toll.
Jetzt kommt meine Frage:
Gibt es eine Möglichkeit, abzuprüfen, ob der Ladevorgang vollständig abgeschlossen ist?
Ich hatte es schon wie folgt versucht, aber ohne Erfolg.
xmlGeladen = XML.Load(DateiName)
If xmlGeladen = False Then
MsgBox "Fehler beim Laden der XML-Datei", vbCritical, "Update"
Exit Sub
End If
Gruß
Bo Kat