Noticias:
Letras de canciones
Nuevo WinEsquema 5
En ésta página:
Todos los programas
FolderQuote
Image Tools
Dominios de Internet
IPUpdate 2
Artículos y fuentes
Software matemático
Pequeñas utilidades
Servicios:
IPTools
Traducción En>Es
Contactar con el autor
Valore la página
|
Localización de IP
Puede usar los siguientes scripts para realizar consultas sobre los datos de cualquier dirección IP.
IPOrg |
www.flavionet.com/weather/geo/iporg.php
Llame a esta dirección para obtener la organización a la que pertenece su IP. Si desea consultar a qué organización pertenece una IP distinta de la suya, llame a: iporg.php?ip=1.2.3.4 donde 1.2.3.4 es la dirección IP que quiera consultar.
Ejemplo, para su IP devuelve:
|
IPData |
www.flavionet.com/weather/geo/ipdata.php
Use esta dirección para obtener información de la localización geográfica de su dirección IP como el país, la ciudad, las coordenadas geográficas decimales (latitud y longitud), así como el código DMA, la región y el código postal (estos tres últimos datos sólo para USA).
Si desea consultar los datos de una dirección IP distinta de la suya, llame a: ipdata.php?ip=1.2.3.4 donde 1.2.3.4 es la dirección IP que quiera consultar.
Ejemplo, para su IP devuelve:
Nota: se usa el caracter de la barra vertical | para separar los datos. |
IPOrg JS |
www.flavionet.com/weather/geo/iporgjs.php
Devuelve los mismos datos que iporg.php pero en formato JavaScript para usarlo directamente en sus páginas web:
Ejemplo, para su IP devuelve:
|
IPData JS |
www.flavionet.com/weather/geo/ipdatajs.php
Devuelve los mismos datos que ipdata.php pero en formato JavaScript para usarlo directamente en sus páginas web:
Ejemplo, para su IP devuelve:
|
LocalFlag |
www.flavionet.com/weather/geo/localflag.php
Devuelve la bandera local de su país (o el de su visitante). Inserte el siguiente fragmento de código HTML en su página para insertar la bandera:
<img src="http://www.flavionet.com/
weather/geo/localflag.php">
Ejemplo de la bandera de tu país ():
|
Si desea obtener estos datos desde su aplicación Visual Basic, puede usar la función Split y el control Internet Transfer.
Private Type IPInfo
ipCountryCode As String
ipCountryCode3 As String
ipCountryName As String
ipRegion As String
ipCity As String
ipPostalCode As String
ipLatitude As String
ipLongitude As String
ipDMACode As String
ipAreaCode As String
End Type
Function GetIPData(InetCtl As Inet, Optional IP As String) As IPInfo
Dim ret As String, fld() As String, ipdata As IPInfo
ret = InetCtl.OpenURL("http://www.flavionet.com/weather/geo/ipdata.php")
fld = Split(ret, "|")
With ipdata
.ipCountryCode = fld(0)
.ipCountryCode3 = fld(1)
.ipCountryName = fld(2)
.ipRegion = fld(3)
.ipCity = fld(4)
.ipPostalCode = fld(5)
.ipLatitude = fld(6)
.ipLongitude = fld(7)
.ipDMACode = fld(8)
.ipAreaCode = fld(9)
End With
GetIPData = ipdata
End Function
Para obtener la dirección IP, cree una variable de tipo IPInfo:
dim datos as IPInfo
datos = GetIPData(el_nombre_de_tu_control_inet, "tu_ip")
msgbox datos.ipCountryName
El ejemplo anterior muestra el nombre del país.
|