Kako napraviti metodu za "curl" komandu u access vba.

[StanislavS]

Pozdrav svima. Da li neko moze da mi pomogne. Potrebno mi je metoda u access vab za "curl" komandu.
Na primer za ovu komandu : curl -X GET "https://efaktura.mfin.gov.rs/api/publicApi/get-unit-measures" -H "accept: /" -H "ApiKey: 462d9282-22cf-4d0b-afbe-17411d375a18"

Ova komanda će vratiti sve jedinice mera koje se koriste u sistemu e-Faktura.

 

[gadafi]

Ne znam da li si rešio problem, ali nisi jedini sa istim pitanjem
Ovde imaš rešenje:

https://stackoverflow.com/questions/17063550/equivalent-curl-in-vba

 

[StanislavS]

Probao sam ovako :

Private Sub btnProvera_Click()

Dim Response, URL, APIkey As String
Dim user, pass, UsernamePasswordBase64 As String
Dim oHTTP As Object
Set oHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

URL = "https://efaktura.mfin.gov.rs/api/publicApi/get-unit-measures"

APIkey = " OVDE SAM UNEO MOJ API KEY "

user = APIkey
pass = ""

UsernamePasswordBase64 = EncodeBase64(user + pass)

oHTTP.Open "GET", URL
oHTTP.SetRequestHeader "Authorization", "Basic " & UsernamePasswordBase64
oHTTP.Send

MsgBox "Status : " & oHTTP.STATUS & vbCrLf & "Status tekst : " & oHTTP.StatusText
Response = oHTTP.ResponseText
MsgBox Response
End Sub

Stalno mi vraca status : "401 unauthorized"

 

[bmaxa]

Probao sam ovako :

Private Sub btnProvera_Click()

Dim Response, URL, APIkey As String
Dim user, pass, UsernamePasswordBase64 As String
Dim oHTTP As Object
Set oHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")

URL = "https://efaktura.mfin.gov.rs/api/publicApi/get-unit-measures"

APIkey = " OVDE SAM UNEO MOJ API KEY "

user = APIkey
pass = ""

UsernamePasswordBase64 = EncodeBase64(user + pass)

oHTTP.Open "GET", URL
oHTTP.SetRequestHeader "Authorization", "Basic " & UsernamePasswordBase64
oHTTP.Send

MsgBox "Status : " & oHTTP.STATUS & vbCrLf & "Status tekst : " & oHTTP.StatusText
Response = oHTTP.ResponseText
MsgBox Response
End Sub

Stalno mi vraca status : "401 unauthorized"

Za Basic autorizaciju user je odvojen sa ':' od passworda...

 

[StanislavS]

Za Basic autorizaciju user je odvojen sa ':' od passworda...

U stvari za autorizaciju se ne koristi user i password. Treba da koristim APIKey. Kao sto je prikazano u "CURL" komandi.
Da li mozda znate koju vrstu autorizacije da koristim ili kako bi trebalo da glasi RequestHeder.

 

[bmaxa]

U stvari za autorizaciju se ne koristi user i password. Treba da koristim APIKey. Kao sto je prikazano u "CURL" komandi.
Da li mozda znate koju vrstu autorizacije da koristim ili kako bi trebalo da glasi RequestHeder.

header je ApiKey: .....

 

[StanislavS]

header je ApiKey: .....

oHTTP.SetRequestHeader "Authorization", "ApiKey", "MOJ_API_KEY"

ovako?

 

[bmaxa]

oHTTP.SetRequestHeader "Authorization", "ApiKey", "MOJ_API_KEY"

ovako?

Mislim da je tako, treba dodati header... curl to radi...