VBA Post Anfrage auf einer Website API mit Parametern

Question

Ich wollte die verschiedenen Preise von dann Kraken API abrufen, aber ich bin nicht sehr vertraut mit der Konstruktion von POST-Anfragen.

abrufen ich einen Code, der den Antrag stellen können, aber ohne Parameter:

Sub retrieve_price() 
Const sUrl As String = "https://api.kraken.com/0/public/Ticker" 

Dim oRequest As WinHttp.WinHttpRequest 
Dim sResult As String 

Set oRequest = New WinHttp.WinHttpRequest 
With oRequest 
    .Open "POST", sUrl, True 
    .Send 
    .WaitForResponse 
    sResult = .ResponseText 
End With 

Range("A1") = sResult 


End Sub 

kraken API information

Von der kraken API Informationen, die sie schreiben:

Get ticker information 
URL: https://api.kraken.com/0/public/Ticker 

Input: 

pair = comma delimited list of asset pairs to get info on 

(gleiche wie eingeschlossen Bild oder auf https://www.kraken.com/help/api#public-market-data)

jedoch diesen Parameter hinzuzufügen, habe ich versucht, beides:

In meinem mit Add:

.SetRequestHeader "pair", "ETHEUR" 

und auch:

.SetRequestHeader "Content-Type", "pair=ETHEUR" 

oder stattdessen für meine Sende schreiben:

.Send ("pair=ETHEUR") 

aber beide funktionen haben nicht funktioniert und ich weiß nicht wie ich dann weiter machen soll. Ich lese How are parameters sent in an HTTP POST request? Aber ich habe nicht verstanden, wie man anwendet, was auf dem Beitrag geschrieben wurde Könnte mir jemand einen Ratschlag geben? Vielen Dank!

Answer 1

Ich denke, Sie möchten eine GET Anfrage.

Wenn Sie das folgende in einem Web-Browser eingeben:

https://api.kraken.com/0/public/Ticker?pair=ETHEUR

Sie sollten eine Antwort etwas wie diese:

{"error":[],"result":{"XETHZEUR":{"a":["167.71714","1","1.000"],"b": 
["167.65000","200","200.000"],"c":["167.71822","0.25164886"],"v": 
["351548.13416062","386545.69665419"],"p":["169.62204","170.24439"],"t": 
[50582,55183],"l":["151.00995","151.00995"],"h": 
["190.98999","190.98999"],"o":"181.57867"}}} 

Sie sollten dies diese JSON-Antwort in der Lage zu analysieren zu bekommen was du brauchst.