Hello,

I’m trying to query and download occurences with some subs written in VBA. While querying works fine, download leads to errors.

At the end oft he query, I have a download link for a ZIP-archive. Putting this into a browser address field lets me download the archive. Giving it to a VBA-Object returns errors.

E.g.,

Set http = CreateObject("WinHttp.WinHttpRequest.5.1")

strURL_Request = "https://api.gbif.org/v1/occurrence/download/" & strDownload

http.setTimeouts 30000, 30000, 30000, 30000

http.Open "GET", strURL_Request, False

http.send

returns a jason file that contains the download link. I extract this link and use it as parameter in the next  step:

http.Open "GET", strURL_ZIP, False

http.send

This results in a timeout. Using "Microsoft.XMLHTTP" alternativly returns „Access denied“

Is this a problem with our network restrictions or does the GBIF server block the query?

Kind regards

Michael

Mit freundlichen Grüßen
Im Auftrag

Michael Reetz

*****************************************
Nationalpark-Verwaltung Niedersächsisches Wattenmeer
Virchowstr. 1
26382 Wilhelmshaven
Tel.: +49 (0) 4421 911 291
Fax.: +49 (0) 441 799 61039
e-mail: michael.reetz@nlpv-wattenmeer.niedersachsen.de
Web: http://www.nationalpark-wattenmeer.de

Flussgebietsmanagement Übergangs-/Küstengewässer
NLWKN * Betriebsstelle Brake / Oldenburg
e-mail: michael.reetz@nlwkn.niedersachsen.de
Web: http://www.nlwkn.niedersachsen.de