Il peut être intéressant, à partir d'une adresse ip, d'avoir le pays, la ville et les coordonnées géographique.
Cela est utile pour afficher des informations liées à la ville, ou positionner l'internaute sur une carte.
C'est possible avec le projet HostIp.
Voici une collection de procédures permettant de récupérer ces infos :
Déclarations des procédures globales :
Infos est un tableau associatif (*, *, *, 4) de chaînes
PROCEDURE RecupInfos(sIp est une chaîne)
s est une chaîne
// On interroge Hostip.
SI PAS HTTPRequête("http://api.hostip.info/get_html.php?ip="+sIp+"&position=true") ALORS
Erreur()
SINON
sres est une chaîne = HTTPDonneRésultat(HTTPRésultat)
// sRes est de la forme
// Country: FRANCE (FR)
// City: (Unknown city)
// Latitude:
// Longitude:
POUR TOUTE CHAINE s DE sres SEPAREE PAR Caract(10)
Infos[SansEspace(ExtraitChaîne(s,1,":",DepuisDébut))] = ExtraitChaîne(s,2,":",DepuisDébut)
FIN
FIN
PROCEDURE Pays()
RENVOYER Infos["Country"]
PROCEDURE Ville()
RENVOYER Infos["City"]
PROCEDURE Lattitude()
RENVOYER Infos["Latitude"]
PROCEDURE Longitude()
RENVOYER Infos["Longitude"]
Aucun commentaire:
Enregistrer un commentaire