(AutoIt) ip-api.com IPv4 Geolocation Lookup

Demonstrates how to lookup Geolocation data for an IPv4 address using the ip-api.com API.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

; This example requires the Chilkat API to have been previously unlocked.
; See Global Unlock Sample for sample code.

$oHttp = ObjCreate("Chilkat.Http")

; Lookup an IPv4 address: 149.250.207.170  (this was a randomly chosen address)
Local $sJsonStr = $oHttp.QuickGetStr("http://ip-api.com/json/149.250.207.170")
If ($oHttp.LastMethodSuccess = False) Then
    ConsoleWrite($oHttp.LastErrorText & @CRLF)
    Exit
EndIf

$oJson = ObjCreate("Chilkat.JsonObject")
$oJson.EmitCompact = False
Local $bSuccess = $oJson.Load($sJsonStr)

ConsoleWrite($oJson.Emit() & @CRLF)

; Sample output:
; Use this online tool to generate parsing code from sample JSON: 
; Generate Parsing Code from JSON

; {
;   "as": "AS15854 Hewlett Packard GmbH",
;   "city": "B�blingen",
;   "country": "Germany",
;   "countryCode": "DE",
;   "isp": "Triaton Frankfurt",
;   "lat": 48.6779,
;   "lon": 8.97297,
;   "org": "EntServ Deutschland GmbH",
;   "query": "149.250.207.170",
;   "region": "BW",
;   "regionName": "Baden-W�rttemberg",
;   "status": "success",
;   "timezone": "Europe/Berlin",
;   "zip": "71034"
; }

Local $sAs
Local $sCity
Local $sCountry
Local $sCountryCode
Local $sIsp
Local $sLat
Local $sLon
Local $sOrg
Local $sQuery
Local $sRegion
Local $sRegionName
Local $status
Local $sTimezone
Local $sZip

$sAs = $oJson.StringOf("as")
$sCity = $oJson.StringOf("city")
$sCountry = $oJson.StringOf("country")
$sCountryCode = $oJson.StringOf("countryCode")
$sIsp = $oJson.StringOf("isp")
$sLat = $oJson.StringOf("lat")
$sLon = $oJson.StringOf("lon")
$sOrg = $oJson.StringOf("org")
$sQuery = $oJson.StringOf("query")
$sRegion = $oJson.StringOf("region")
$sRegionName = $oJson.StringOf("regionName")
$status = $oJson.StringOf("status")
$sTimezone = $oJson.StringOf("timezone")
$sZip = $oJson.StringOf("zip")