23 replies to this topic

[Fleon]

Hola, ¿hay manera de saber con delphi si existe conección a internet?.

Fleon xD




Edito para corregir el título. escafandra.

[escafandra]

Existe una API para eso, InetIsOffline. El caso es que esa API informa que estamos conectados con sólo tener una tarjeta de red conectada. No sirve para el propósito buscado.

La mejor manera de saber si estamos conectados es hacer un Ping a una IP conocida y de respuesta estable y segura (en lo posible), como puede ser Google.com (64.233.187.99 ó 64.233.183.99 etc).

Saludos.

[root]

o puedes hacerle ping a la pagina
66.96.134.34

hay creo la pregunta que queda es ¿se pueden invocar comandos de DOS desde delphi ?

asi como para hacer ping y en el caso de que haya respuesta te mande un mensaje, ilumine un boton o algo asi ??

[enecumene]

Creo que se puede invocar comandos DOS en delphi, pero ya existen componentes para ello, están las indy que traen por defecto Delphi y ví­a API como éste de nuestro colega chackall.

Saludos.

[escafandra]

Efectivamente, el ping de puede hacer con las Indy, pero también de puede implementar una función propia. Revisa el código de cHackAll y este artí­culo: Implementing PING without using raw sockets.

Escribí­ hace algún tiempo una función Ping en C, por lo que, de momento, no tiene sentido publicarla aquí­.

Saludos.

[Delphius]

A parte del viable ping... yo me pregunto... ¿se puede emplear la función InternetGetConnectedState de WinInet?

Mi duda es si es que funcionará... por lo de LAN + modem/router.

Saludos,

[escafandra]

A parte del viable ping... yo me pregunto... ¿se puede emplear la función InternetGetConnectedState de WinInet?

Mi duda es si es que funcionará... por lo de LAN + modem/router.

Saludos,

Pues, a priori, pensar en InternetGetConnectedState es una buena idea. El problema es que sólo informa del tipo de conexión, no si realmente existe dicha conexión. Si apagas el router devuelve false, pero al encenderlo devuelve true inmediatamente, sin esperar a que se sincronice la ADSL y sin disponer, por tanto, de conexión. Lo mismo sucede si se desconecta el cable telefónico del router, simplemente informa true y el tipo de conexión, pero no la tenemos. Podéis realizar la prueba...

La forma más fiable es, a mi entender, un ping, ya que se enví­an y reciben paquetes. El punto débil es la caí­da de la IP destino, por eso uso IPs de Google, pensando que es bastante estable.

Saludos.

[joseme]

el amigo Escafandra tiene razón, el ping es la mejor/más sencilla/más segura forma de saber si estamos conectados. Es mejor en mi opinión hacer el ping a una url que a un ip, porque podrí­a cambiar.

[escafandra]

el amigo Escafandra tiene razón, el ping es la mejor/más sencilla/más segura forma de saber si estamos conectados. Es mejor en mi opinión hacer el ping a una url que a un ip, porque podrí­a cambiar.

Efectivamente. De una URL sacas por código, con facilidad, la IP que es en definitiva el sujeto del Ping.

Saludos.

[root]

Asi es
yo también opino que es mejor darle ping a un dominio
ya que así­ también compruebas que tengas resolución de dns
por que me ha ocurrido ocasiones en las que responden al ping
pero no hay resolucion de dns ( bueno me sucedio con cableacces )

Root

[Fleon]

Hola amigos, muchas gracias por su respuesta, por lo que veo es muy sencillo con el asunto del ping, pero tengo una duda al hacer ping a un dominio y no IP, intenté hacer PIng en CMD a google y no me sale, ¿cual es la manera correcta de hacerla?.

Fleon xD

[Fenareth]

asm

ping google.com.mx

...y debe regresar la IP 74.125.91.104

Saludos 

[root]

pies solo escrives ping y el nombre del dominio
c:\ping google.com
hara cuatro pings

si requieres que el proceso sea permanente
necesitas agregarle un " -t "
para detenerlo es como un archivo por lotes
" Ctrl + C "

mmmm no pude anexar el print screen

[escafandra]

Hola amigos, muchas gracias por su respuesta, por lo que veo es muy sencillo con el asunto del ping, pero tengo una duda al hacer ping a un dominio y no IP, intenté hacer PIng en CMD a google y no me sale, ¿cual es la manera correcta de hacerla?.

Fleon xD

¿Tu conexión es mediante proxy?

Saludos.

[Fleon]

¿Tu conexión es mediante proxy?

En efecto sí­.

Fleon xD

[escafandra]

Pues en ese caso no sirve. Ping usa el protocolo ICMP para la comunicación, sin embargo Proxy Server sólo soporta paquetes TCP y UDP.

En este caso, quizás lo mas adecuado sea probar a leer una web, que también puede ser google.com mediante las API InternetOpen y InternetReadFile. Previamente debes estar identificado en el proxy.

Saludos.

[egostar]

Pues en ese caso no sirve. Ping usa el protocolo ICMP para la comunicación, sin embargo Proxy Server sólo soporta paquetes TCP y UDP.

En este caso, quizás lo mas adecuado sea probar a leer una web, que también puede ser google.com mediante las API InternetOpen y InternetReadFile. Previamente debes estar identificado en el proxy.

Saludos.

Una pregunta, y que pasa si la página que consultas esta en cache?

Salud OS

[escafandra]

Pues en ese caso no sirve. Ping usa el protocolo ICMP para la comunicación, sin embargo Proxy Server sólo soporta paquetes TCP y UDP.

En este caso, quizás lo mas adecuado sea probar a leer una web, que también puede ser google.com mediante las API InternetOpen y InternetReadFile. Previamente debes estar identificado en el proxy.

Saludos.

Una pregunta, y que pasa si la página que consultas esta en cache?

Salud OS

Hola egostar. No generarí­a ningún problema pues utilizas InternetOpenUrl con el parámetro INTERNET_FLAG_RELOAD forzando la lectura de la página, no del caché.

Saludos.

[egostar]

Pues ya está, duda aclarada

Salud OS

[escafandra]

Bueno, para dar una idea de como quedarí­a la lectura sin caché dejo este ejemplo en C:

cpp

//---------------------------------------------------------------------------
// Lee una Web en Buffer hasta size.
bool InternetReadWeb(char* URL, char* Buffer, int size)
{
  HINTERNET hNet;
  HINTERNET hUrl;
  DWORD BytesRead = 0;
  bool Result = false;
 
  if(InternetAttemptConnect(0) != ERROR_SUCCESS) return false;
 
  hNet = InternetOpen("MyApplication", INTERNET_OPEN_TYPE_PRECONFIG, NULL, NULL, 0);
  if (hNet){
    hUrl = InternetOpenUrl(hNet, URL, NULL, 0, INTERNET_FLAG_RELOAD, 0);
    if (hUrl){
      ZeroMemory(Buffer, size);
      // Lee la pagina web...
      for(int ind=0; ; ind+=BytesRead){
        Result = InternetReadFile(hUrl, Buffer+ind, size-1-ind, &BytesRead);
        if(Result && BytesRead==0) break;
      }
      InternetCloseHandle(hUrl);
    }
    InternetCloseHandle(hNet);
  }
 
  return Result;
}

Saludos.