Por suerte un programador (Per Soderlind) se encargo de desarrollar un script ASP muy f?cil de usar el cual nos permite mediante la IP del usuario averiguar su pa?s.Vean un ejemplo.

Su forma de uso es muy f?cil, solamente debemos mediante un include llamar a un m?todo dentro del script, veamos el ejemplo...

 

<% Option Explicit %> <!--#include file="GeoIP.asp"--> <% Dim oGeoIP,strErrMsg Dim strIP,strCountryName,strCountryCode Set oGeoIP = New CountryLookup oGeoIP.GeoIPDataBase = Server.MapPath("GeoIP.dat") If oGeoIP.ErrNum(strErrMsg) <> 0 Then Response.Write(strErrMsg) Else strIP = request.ServerVariables("REMOTE_ADDR") strCountryName = oGeoIP.lookupCountryName(strIP) strCountryCode = oGeoIP.lookupCountryCode(strIP) End If Set oGeoIP = Nothing %>

Analicemos un poco el c?digo, lo primero que debemos hacer es incluir el mencionado script para ello utilizamos la directiva "include" que apunta al archivo GeoIP.asp (Debajo se puede descargar) este archivo es el que contiene todo el c?digo ASP para detectar el pa?s del usuario.

Luego definimos las variables a utilizar y creamos el objeto el cual nos expondr? todos los m?todos y propiedades del script GeoIP "Set oGeoIP = New CountryLookup". Por ultimo lo que debemos hacer es indicarle donde se encuentra la base de datos de GeoIP llamada "GeoIP.dat" (Debajo se puede descargar), esta base de datos contiene los c?digos de pa?ses (AR, ES, MX, CL, ETC) relacionados con los nombres de los pa?ses (Argentina, Espa?a, Etc.)

Una ves definida esa propiedad podemos utilizar los m?todos..

lookupCountryName(ip) - Pas?ndole como par?metro la ip devuelve el nombre del pa?s. lookupCountryCode(ip) - Pas?ndole como par?metro la ip devuelve el codigo del pa?s. Recordemos que para obtener la ip del usuario utilizamos..

 

strIP = request.ServerVariables("REMOTE_ADDR")

Bien, ahora siguiendo con el ejemplo anterior para mostrar los datos lo ?nico que debemos hacer es un Response.Write con los datos obtenidos..

 

<% Response.Write strCountryName Response.Write strCountryCode %>

Cortesia / Agradecimiento: http://www.elguruprogramador.com.ar