AYUDA EN LÍNEA
 WINDEVWEBDEV Y WINDEV MOBILE

Este contenido se ha traducido automáticamente.  Haga clic aquí  para ver la versión en inglés.
Ayuda / WLanguage / Funciones WLanguage / Comunicación / Funciones HTTP
  • cortafuegos
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaReportes y ConsultasCódigo de Usuario (UMC)
WEBDEV
WindowsLinuxPHPWEBDEV - Código Navegador
WINDEV Mobile
AndroidWidget Android iPhone/iPadIOS WidgetApple WatchMac CatalystUniversal Windows 10 App
Otros
Procedimientos almacenados
InternetConnected( Función)
Define si una conexión INTERNET está habilitada en el ordenador actual.
AndroidWidget Android iPhone/iPad Permite que se le notifique cuando cambie el estado de la conexión de INTERNET.
Ejemplo
// Active Internet connection?
ResConnection = InternetConnected()
IF ResConnection = True THEN
Info("An Internet connection is enabled")
ELSE
Info("No Internet connection is enabled")
END
Sintaxis

Averiguar si una conexión INTERNET está habilitada Ocultar los detalles

<Result> = InternetConnected()
<Result>: booleano
  • True si hay una conexión a Internet activa en el equipo,
  • False en caso contrario.
AndroidWidget Android iPhone/iPad

Pedir un Notification cuando el estado de la conexión INTERNET cambia Ocultar los detalles

<Result> = InternetConnected([<WLanguage procedure>])
<Result>: booleano
  • True si se asoció el procedimiento a la función InternetConnected,
  • False en caso contrario.
<WLanguage procedure>: Nombre de Procedure
WLangage Procedure ("callback" Procedure) llamó cuando el estado de la conexión INTERNET cambia.
Este procedimiento tiene el siguiente formato:
PROCEDURE <Procedure name>(<Status>)
<Estado> es una constante entera que corresponde al nuevo estado de la conexión de INTERNET.
Puede tomar los siguientes valores:
networkDisconnectedLa red está desconectada o es inaccesible.
networkEthernetLa conexión de INTERNET se realiza por Ethernet.
networkMobileLa conexión de INTERNET se realiza en modo móvil: borde, 2G, 3G, 4G, ....
networkWifiLa conexión de INTERNET se realiza por Wi-Fi.

Si <WLanguage Procedure> es una cadena vacía (""), ya no se llamará al WLanguage Procedure previamente definido.
Observaciones
WINDEVReportes y ConsultasCódigo de Usuario (UMC)

cortafuegos

InternetConnected utiliza una petición ping para comprobar el acceso INTERNET. Por lo tanto, los parámetros de seguridad de la red deben permitir el ping para que el resultado de la función sea pertinente.
Observación: El ping se realiza en el DNS de Google (6 segundos, 1 intento). El código equivalente es:
Ping("8.8.8.8", 6000, 1)
AndroidWidget Android Permisos necesarios
La llamada a esta función modifica los permisos requeridos por la aplicación.
Requerido Permission : ACCESS_NETWORK_STATE: esta Permission permite a las aplicaciones acceder a la información relativa a las redes.
AndroidWidget Android iPhone/iPad Cambio de estado de conexión (sintaxis 2)
  • Llama a la Procedure:
    • iPhone/iPad El WLanguage Procedure se llama sólo cuando el estado de la red cambia. No se llama cuando se llama a InternetConnected. Debe llamar a InternetConnected (sin parámetros) para saber si la conexión INTERNET está habilitada o no.
    • AndroidWidget Android El lenguaje WL Procedure se llama automáticamente cuando se llama a InternetConnected.
  • Sólo una Procedure puede ser associated con InternetConnected. Si se llama varias veces a InternetConnected con diferentes nombres Procedure, el Procedure utilizado para detectar el estado de la conexión a Internet será sustituido por el último Procedure especificado.
  • AndroidWidget Android Si se llama a la función InternetConnected desde un hilo secundario, se llamará al procedimiento en el hilo principal de la aplicación.
Componente: wd290com.dll
Ver también
Versión mínima requerida
  • Versión 9
Esta página también está disponible para…
Comentarios
Exemplo
sRetorno is string = ""

cMyRequest is httpRequest

IF InternetConnected() = False THEN

ToastDisplay("Sem conexão com a internet",toastShort,vaBottom,haCenter)

RETURN("OFF")

ELSE

cMyRequest.URL = URL_SISTEMA+REGRA_PING
cMyRequest.Timeout = 45s

cMyResponse is httpResponse = HTTPSend(cMyRequest)

IF cMyResponse.StatusCode = 200 THEN

//sRetorno = AnsiToUnicode(cMyResponse.Content)
sRetorno = UTF8ToAnsi(cMyResponse.Content)

RETURN(sRetorno)

ELSE

RETURN("NOK")

END

END
Boller
23 05 2023
CHECK INTERNET
https://youtu.be/LVQMglOruG4

// VERIFICA INTERNET
// CHECK INTERNET
// VÉRIFIER INTERNET

https://windevdesenvolvimento.blogspot.com/2019/01/dicas-1981-windev-mobile-certificado-13.html

bRESULTADO_CONEXAO is boolean=InternetConnected()
// VAMOS AGORA VERIFICAR O RESULTADO DA CONEXÃO
// LET'S CHECK THE CONNECTION RESULT NOW
// Vérifions le résultat de la connexion maintenant
IF bRESULTADO_CONEXAO=True THEN
Info("CONEXAO OK")
ELSE
Info("ERRO CONEXÃO")
END
amarildo
10 01 2019
** Dica **
Cuidado, ao utilizar essa função, não é confiável para testar Internet. Usavamos em nosso ERP, porém aconteceu de parar nossa emissão de NFe devido a função retornar equivocadamente que não tinha Conexão de Internet na máquina.

Para testar Conexão de Internet recomendo utilizar, o Post do Adriano Boller:
http://forum.pcsoft.fr/fr-FR/pcsoft.us.windevmobile/605-conexao-internet/read.awp
Danilo
22 12 2016

Última modificación: 27/05/2022

Señalar un error o enviar una sugerencia | Ayuda local