Guten Abend,
ich möchte via VBA einen parametrisierten URL aufrufen, der einen JSON zurückliefert. Diesen JSON möchte ich zur Weiterverarbeitung in einem String (sTxt) speichern. Meine Überlegung war, hierzu ein Browserobjekt zu nutzen:
Dim appIE As Object
Dim sTxt As String
Set appIE = CreateObject("InternetExplorer.Application")
appIE.navigate "http://beispiel.de/api/assets?indexId=myapplication&start=1&end=200 (Rückgabe eines JSON mit 200 Datensätzen)
Do: Loop Until appIE.Busy = False
Do: Loop Until appIE.Busy = False
sTxt = appIE.document.DocumentElement.outerHTML
Set appIE = Nothing
Close
Die Zeile "sTxt = appIE.document.DocumentElement.outerHTML" erzeugt einen Laufzeitfehler. Liegt vermutlich daran, dass ein JSON kein HTML-Dokument ist ;-) Wie ist der richtige Lösungsweg? Ein Beispielcode würde mir helfen.
Grüße
Sebastian