(PureBasic) Find My External Public IP Address
To find your external public IP address (not your LAN IP address, such as 192.168.1.* or 172.16.16.*, etc), your application would need to send a request to an HTTP server that can report back on the origin IP address. You can easily write a simple script on your own web server to do it, or you can use a service such as ipify.org.
This example shows how to send a request to the ipify.org endpoint to get your public IP address. For more information, see https://www.ipify.org/
IncludeFile "CkHttp.pb"
Procedure ChilkatExample()
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
my_ip_address.s = CkHttp::ckQuickGetStr(http,"https://api.ipify.org")
If CkHttp::ckLastMethodSuccess(http) = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
ProcedureReturn
EndIf
Debug "My Public IP Address: " + my_ip_address
CkHttp::ckDispose(http)
ProcedureReturn
EndProcedure
|
