(Lianja) ip-api.com IPv4 Geolocation Lookup

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

Chilkat Lianja Extension Download Chilkat Lianja Extension

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

loHttp = createobject("CkHttp")

// Lookup an IPv4 address: 149.250.207.170  (this was a randomly chosen address)
lcJsonStr = loHttp.QuickGetStr("http://ip-api.com/json/149.250.207.170")
if (loHttp.LastMethodSuccess = .F.) then
    ? loHttp.LastErrorText
    release loHttp
    return
endif

loJson = createobject("CkJsonObject")
loJson.EmitCompact = .F.
llSuccess = loJson.Load(lcJsonStr)

? loJson.Emit()

// 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"
// }

lcAs = loJson.StringOf("as")
lcCity = loJson.StringOf("city")
lcCountry = loJson.StringOf("country")
lcCountryCode = loJson.StringOf("countryCode")
lcIsp = loJson.StringOf("isp")
lcLat = loJson.StringOf("lat")
lcLon = loJson.StringOf("lon")
lcOrg = loJson.StringOf("org")
lcQuery = loJson.StringOf("query")
lcRegion = loJson.StringOf("region")
lcRegionName = loJson.StringOf("regionName")
lcStatus = loJson.StringOf("status")
lcTimezone = loJson.StringOf("timezone")
lcZip = loJson.StringOf("zip")


release loHttp
release loJson