FiveTech Software tech support forums

Gracias,

Adhemar puedo usar tú sitio para hacer la conexion con la internet?

Salu2

He intentado con www.hotmail.com y www.google.com y también varian me parece que es así por seguridad.
Deben tener algún software que las hace variar.

Saludos,

Adhemar

Hay muchos sitios web que optan por bloquear la respuesta a los PINGs.
El sitio www.microsoft.com es un caso concreto de esos. El motivo por el cual optan por no responder pueden ser varios, seguridad, etc...

Adhemar, porque no funciona con http://www.microsoft.com ?? #include "fivewin.ch"// PRUEBA DE PING //function main()   if WSAStartup() != 0      MsgAlert( "WSAStartup error" )      return nil   endif  ...

hmpaquito Se pregunta por una IP concreta porque si tu conexión sale por PROXI la IP de http://www.microsoft.com es diferente a si salis directamente (No se porque) Ej. con PROXY 108.83.52.0 y sin 64.4.11.42 y es mas lento PROXI es un servidor de navegación (ISA o TMG) el cual tiene todos los filtro...

Adhemar,

Ando cortito en asuntos web.
¿ Puede explicar la funcion ? ¿ es válida para cualquier computador ?
¿ que hacen las distintas funciones Inet ? ¿ Por qué se pregunta por unas IP concretas ?

Gracias.

Gracias Adhemar, talvez és por eso que las veces la función IsInternet() devuelve que no tiene internet para la IP de la computadora se és fijado?

Gracias,

Salu2

... el código a lo de mi empresa y funciona de maravilla. #include "FiveWin.ch"FUNCTION Main()  Private lOk:=.F.  If IsInternet()    ?"Si"  Else     ?"No"  EndifReturnFUNCTION IsInternet()  ...

Gracias maestro Antonio, mi duda és cual é la diferença entre la dos functions? Esta é mejor que la function standard de fivewin? FUNCTION IsInternet()    LOCAL pSocket, lOk := .F.    INetInit()    pSocket := INetConnect( "www.microsoft.com", 80 )    //? INetAddress( ...

El código de Eduardo para hacer ping es muy interesante para saber hacer ping, pero desde su propio código se llama a GetHostByName(), que ya implica que hay internet (salgo que tomase el resultado de un DNS en cache, no se si esto se pueda dar). Lo que quiero decir es que si funciona GetHostByName(...

Gracias, voy probar.

Hola...
Aquí el link de aquella función que te mencionaba: viewtopic.php?f=6&t=20679&p=109714&hilit=ping#p109714

Espero te sirva la idea.
Saludos,

Podrías hacer una función que haga un PING a google por ejemplo...
Yo hace mucho tiempo había tirado una función aquí en el foro... Ahora debería buscarla. Pero seguramente aquí en el foro debería estar.

Para los maestros: Cual és la mejor FUNCTION? Esta? FUNCTION IsInternet()   LOCAL cIp, cVret := .F.   WsaStartUp()   // conforme pessoal do forum, e para chamar duas vezes ??   cIp := GETHOSTBYNAME( ...

... corregido, pero tuve problemas al trabajar con fivewin y multihilos en xharbour, con harbour hasta ahorita no, pero ya casi no los uso. La función isInternet() detecta la conexión contra la página de microsoft, lo que te sugerí es únicamente revisar la conexión contra el servidor de mysql, puede ...