Page 1 of 1

Conocer la IP

PostPosted: Tue Dec 09, 2008 7:04 pm
by yadira
Hola a todos
hay alguna funcion que pueda usar para conocer la ip de la maquina que estoy trabajando, me refiero claro a una ip publica de internet ?

si no la hay, ¿como puedo saberla por medio de programacion?

saludos

PostPosted: Tue Dec 09, 2008 7:19 pm
by Antonio Linares
Code: Select all  Expand view
Function GetIP()
   Local cVar1

   WsaStartUp()
   cVar1 := GetHostByName( GetHostName() )
   WsaCleanUp()

return cVar1

PostPosted: Tue Dec 09, 2008 8:29 pm
by yadira
Gracias Antonio
Ya realice lo que me indicaste, pero regresa la IP Local no la de Internet (Tengo IP Dinamica), debo aclarar que tengo un ruteador y la funcion me da como respuesta
192.168.0.3

y mi IP en este dia es: 200.124.20.22

gracias por tu respuesta