Xailer & OZ Software

No recuerdo si se ha publicado algo al respecto... y ahí­ lo dejo.
¿Como puedo saber la IP pública, de mi PC, de salida a internet???
Gracias.
Un Saludo,
Xevi.
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5822 (20110126) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com

No se si es esto lo que quieres, pero escribe en google:
"cual es mi ip"
y te salen varias páginas que te dicen con que IP sales a internet.
Saludos
Jose Alfonso Suarez Moreno
El 27/01/2011 8:04, Xevi escribió:
> No recuerdo si se ha publicado algo al respecto... y ahí­ lo dejo.
> ¿Como puedo saber la IP pública, de mi PC, de salida a internet???
>
> Gracias.
>
> Un Saludo,
> Xevi.
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 5822 (20110126) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>

Xevi
No se si es lo que estas buscando, yo para saber la IP externa desde el
sistema utilizo el siguiente codigo
MyIp:=TInternet():New(Application)
IF MyIp:Open()
Msg:=MyIp:OpenURL("http://flavionet.com/ipcheck.php")
MyIp:ReadFile( Msg, @cData, 65536 )
EndIf
"Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
news:4d411911$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> No recuerdo si se ha publicado algo al respecto... y ahí lo dejo.
> ¿Como puedo saber la IP pública, de mi PC, de salida a internet???
>
> Gracias.
>
> Un Saludo,
> Xevi.
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 5822 (20110126) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>

Xevi:
Pruebe esta función:

FUNCTION GetIp()
LOCAL aHosts,cName,cEstacao:=NetName(.f.)
InetInit()
aHosts := InetGetHosts( cEstacao )
IF aHosts == NIL .OR. Empty(aHosts)
aHosts := InetGetAlias( cEstacao )
ENDIF
InetCleanup()
RETURN ahosts[1]

NOTA: Esta función no informa a la IP pública de Internet, pero la red. Perdón por la mala interpretación de su mensaje.

Boris
PERFECTO !!!
Gracias.
Un Saludo,
Xevi.
"Boris Chesini" <masterisi@masterisi.com.ar> ha escrit al
missatge:[email=4d4156b7@svctag-j7w3v3j....]4d4156b7@svctag-j7w3v3j....[/email]
> Xevi
> No se si es lo que estas buscando, yo para saber la IP externa desde el
> sistema utilizo el siguiente codigo
>
>
> MyIp:=TInternet():New(Application)
> IF MyIp:Open()
> Msg:=MyIp:OpenURL("http://flavionet.com/ipcheck.php")
> MyIp:ReadFile( Msg, @cData, 65536 )
> EndIf
>
>
>
> "Xevi" <xevicomas_quitar_esto@gmail.com> escribió en el mensaje
> news:4d411911$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
>> No recuerdo si se ha publicado algo al respecto... y ahí­ lo dejo.
>> ¿Como puedo saber la IP pública, de mi PC, de salida a internet???
>>
>> Gracias.
>>
>> Un Saludo,
>> Xevi.
>>
>> __________ Información de ESET NOD32 Antivirus, versión de la base de
>> firmas de virus 5822 (20110126) __________
>>
>> ESET NOD32 Antivirus ha comprobado este mensaje.
>>
>> http://www.eset.com
>>
>>
>>
>
>
>
> __________ Información de ESET NOD32 Antivirus, versión de la base de
> firmas de virus 5825 (20110127) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5825 (20110127) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com

Mario
Esta función devuelve la IP local.
Un Saludo,
Xevi.
"Mário Angelini" <mario[at]emeasoft[dot]com[dot]br> ha escrit al
missatge:4d4161bf$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
> Xevi:
>
> Pruebe esta función:
>
>
> FUNCTION GetIp()
> LOCAL aHosts,cName,cEstacao:=netname(.f.)
> InetInit()
> aHosts := InetGetHosts( cEstacao )
> IF aHosts == NIL .OR. Empty(aHosts)
> aHosts := InetGetAlias( cEstacao )
> ENDIF
> InetCleanup()
> RETURN ahosts[1]
>
> --
> Saludos!
> Mário Angelini
> http://www.eMeAsOfT.com
> http://emeasoft.blogspot.com/
> http://twitter.com/emeasoft
>
> http://bit.ly/ci22sm
> http://www.brasilturismo.com/brasil/
>
> __________ Informaci�n de ESET NOD32 Antivirus, versi�n de la base de
> firmas de virus 5825 (20110127) __________
>
> ESET NOD32 Antivirus ha comprobado este mensaje.
>
> http://www.eset.com
>
>
>
__________ Información de ESET NOD32 Antivirus, versión de la base de firmas de virus 5825 (20110127) __________
ESET NOD32 Antivirus ha comprobado este mensaje.
http://www.eset.com