Page 1 of 1

Conocer la IP

Posted: 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

Posted: Tue Dec 09, 2008 7:19 pm
by Antonio Linares

Code: Select all

Function GetIP() 
   Local cVar1 

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

return cVar1 

Posted: 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