Chilkat HOME Android™ Classic ASP C C++ C# Mono C# .NET Core C# C# UWP/WinRT DataFlex Delphi ActiveX Delphi DLL Visual FoxPro Java Lianja MFC Objective-C Perl PHP ActiveX PHP Extension PowerBuilder PowerShell PureBasic CkPython Chilkat2-Python Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ Visual Basic 6.0 VB.NET VB.NET UWP/WinRT VBScript Xojo Plugin Node.js Excel Go
(Excel) ipapi.co IPv4 Geolocation LookupDemonstrates how to lookup Geolocation data for an IPv4 address using the ipapi.co REST API.
' This example requires the Chilkat API to have been previously unlocked. ' See Global Unlock Sample for sample code. Dim http As Chilkat.Http Set http = Chilkat.NewHttp ' Lookup an IPv4 address: 149.250.207.170 (this was a randomly chosen address) jsonStr = http.QuickGetStr("https://ipapi.co/149.250.207.170/json") If (http.LastMethodSuccess = False) Then Debug.Print http.LastErrorText Exit Sub End If Dim json As Chilkat.JsonObject Set json = Chilkat.NewJsonObject json.EmitCompact = False success = json.Load(jsonStr) Debug.Print json.Emit() ' Sample output: ' Use this online tool to generate parsing code from sample JSON: ' Generate Parsing Code from JSON ' { ' "ip": "149.250.207.170", ' "city": "Bblingen", ' "region": "Baden-Wrttemberg", ' "region_code": null, ' "country": "DE", ' "country_name": "Germany", ' "continent_code": "EU", ' "in_eu": true, ' "postal": null, ' "latitude": null, ' "longitude": null, ' "timezone": null, ' "utc_offset": null, ' "country_calling_code": "+49", ' "currency": "EUR", ' "languages": "de", ' "asn": "AS15854", ' "org": "EntServ Deutschland GmbH" ' } ip = json.StringOf("ip") city = json.StringOf("city") region = json.StringOf("region") region_code = json.StringOf("region_code") country = json.StringOf("country") country_name = json.StringOf("country_name") continent_code = json.StringOf("continent_code") in_eu = json.BoolOf("in_eu") postal = json.StringOf("postal") latitude = json.StringOf("latitude") longitude = json.StringOf("longitude") timezone = json.StringOf("timezone") utc_offset = json.StringOf("utc_offset") country_calling_code = json.StringOf("country_calling_code") currency = json.StringOf("currency") languages = json.StringOf("languages") asn = json.StringOf("asn") org = json.StringOf("org") |
© 2000-2022 Chilkat Software, Inc. All Rights Reserved.