curl --location 'https://comuni.ale 1

[sal21]

from the guide of api

curl --location '

https://comuni.alessiopellizzaro.it/api/v1/comuni?Denominazione=Montecchio Maggiore'

--header 'Authorization: Bearer YOUR_TOKEN'

for example

curl --location '

https://comuni.alessiopellizzaro.it/api/v1/comuni?Denominazione=Verona'

--header 'Authorization: Bearer ####YOUR_TOKEN#### '

my token:12336585ffgddf

result:

"CodiceRegione": 5,

"ProgressivoDelComune": 91,

"CodiceComuneFormatoAlfanumerico": "023091", // Codice ISTAT

"Denominazione": "Verona",

"DenominazioneIt": "Verona",

"DenominazioneOther": "",

"CodiceRipartizioneGeografica": "2",

"RipartizioneGeografica": "Nord-est",

"Regione": "Veneto",

"SiglaAutomobilistica": "VR",

"CodiceComuneformatoNumerico": 23091,

"CodiceComuneNumerico_2010_2016": 23091,

"CodiceComuneNumerico_2006_2009": 23091,

"CodiceComuneNumerico_1995_2005": 23091,

"CodiceCatastaleDelComune": "L781",

"CodiceElettorale": "1050890900",

"CodiceBelfiore": "L781",

"PrefissoTelefonico": "045",

"CodiceCAP": "37121",

"NUTS1_2010": "ITH",

"NUTS2_2010": "ITH3",

"NUTS3_2010": "ITH31",

"NUTS1_2021": "ITH",

"NUTS2_2021": "ITH3",

"NUTS3_2021": "ITH31",

can you modify this, please:

Sub TEST_JSON_PARSE()

Dim xmlhttp As New MSXML2.XMLHTTP60, myurl As String

myurl = "

https://api.zipcodestack.com/v1/search?codes=80128&country=it"

'//replace with your URL

With xmlhttp

.Open "GET", myurl, False
.setRequestHeader , "apikey: XXXXXXXXXXXXXXXXXXXXXXX"
.send
Debug.Print .responseText

End With

End Sub

 

[strongm]

.setRequestHeader "Authorization", "Bearer 5654664564wh fghfhfghfg

 

[sal21]

Resolved not consider, my last post modified

 

[strongm]

.setRequestHeader "apikey", "XXXXXXXXXXXXXX"

wher XXXXXXXXXXXXXX represents your 14 character API key