IP de Conexion

[Marco A. Delgado]

Hola

Alguien me podria decir como obtengo mi direccion IP de conexion a internet.

ya probe:
GetHostByName(GetHostName())

y me retorna la direccion ip de la maquina, pero yo quiero la direccion de conexion que te otorga el servicio de internet.

Saludos

Marco A. Delgado

[R.F.]

Hummm esa info va a estar dificil de sacar, porque no la tiene la computadora que estas usando, esa info la tiene el modem (cable o adsl) por lo tanto la compu no le puede preguntar al modem cual es la IP.

Una chapuza que se me ocurre asi al vuelo, es utilizar el webclient de FiveWin para llamar a la pagina www.whatismyip.com, y luego con un memoread buscar la IP en el texto devuelto dentro.

Ffuncky tiene un componente que te devuelve todas las direcciones IP que tiene el equipo, pero no se si se incluye la publica de internet

Code: Select all  Expand view

oFuncky := TOLEAUTO():NEW("funcky")

aIP := {}
x := 1
DO WHILE ! EMPTY(oFuncky:IpAddress(x))
   AADD(aIP,oFuncky:IpAddress(x))
   x++
ENDDO
MsgList(aIP)

[Marco A. Delgado]

mmm, me imaginaba algo por el estilo, pero bueno seguire buscando

Gracias por la respuesta Rene


Saludos

Marco A. Delgado.