Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   C++ Builder (https://www.clubdelphi.com/foros/forumdisplay.php?f=13)
-   -   cual es mi IP? (https://www.clubdelphi.com/foros/showthread.php?t=42108)

elcaracas 04-04-2007 15:52:49

cual es mi IP?
 
Me gustaría saber cómo puedo saber cual es la IP de mi router, no la Local

Alguien puede echarme una mano?

Gracias

fjcg02 05-04-2007 00:27:38

Si tienes el pc funcionando con el router, coincidirá con el valor de gateway de salida. PAra mirarlo, puedes ir a las propiedades del tcp/ip o abrir una ventana de comandos ( cmd ) yescribir C:> ipconfig/all

El valor que ponga en 'puerta de enlace predeterminada' será la ip de tu router.

Si no está funcionando, tendrás que buscar en la documentación del cacharro.
Suerte y un saludo

Edito: como me he lanzado a la piscina sin flotador, rectifico. PAra saber la ip publica busca en google cualesmiip y tge saldrán tropecientas mil paginas donde probar

seoane 05-04-2007 01:48:08

No hace falta recurrir a google. Aquí mismo tienes varias alternativas

Por ejemplo esta:
Código Delphi [-]
uses WinInet, Winsock;

const
  Pagina = 'https://dynupdate.no-ip.com/ip.php';

function ObtenerIP: String;
var
  hNet: HINTERNET;
  hUrl: HINTERNET;
  Buffer: array[0..15] of Char;
  BytesRead: DWORD;
begin
  Result := '';
  hNet := InternetOpen('agent', INTERNET_OPEN_TYPE_PRECONFIG, nil, nil, 0);
  if (hNet <> nil) then
  begin
    hUrl := InternetOpenUrl(hNet, Pagina, nil, 0, INTERNET_FLAG_RELOAD, 0);
    if (hUrl <> nil) then
    begin
      FillChar(Buffer,Sizeof(Buffer),0);
      if InternetReadFile(hUrl, @Buffer, sizeof(Buffer)-1, BytesRead) then
        // Aqui comprobamos que la direccion que nos devuelve tiene el formato correcto
        if inet_addr(@Buffer)<>INADDR_NONE then
          Result:= Buffer;
      InternetCloseHandle(hUrl);
    end;
    InternetCloseHandle(hNet);
  end;
end;
que puedes encontrar en este hilo:
Saber el IP de internet LA SOLUCION !!!

También tienes este otro hilo que habla del tema, y seguro que hay alguno mas:
Conocer ip publica del router

elcaracas 10-04-2007 12:29:04

hola.

me da errores del tipo:

[Linker Error] Unresolved external 'InternetOpenA' referenced from C:\ARCHIVOS DE PROGRAMA\BORLAND\CBUILDER6\PROJECTS\UNIT1.OBJ

alguien puede ayudarme, utilizo el c++builder?

Gracias.

seoane 10-04-2007 14:04:52

Prueba colocando esto:
Código:

#pragma link "wininet.lib"


La franja horaria es GMT +2. Ahora son las 11:25:39.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi