ONLINE HELP
 WINDEVWEBDEV AND WINDEV MOBILE

Help / WLanguage / WLanguage functions / Communication / HTTP functions
  • Firewall
WINDEV
WindowsLinuxUniversal Windows 10 AppJavaEtats et RequêtesCode Utilisateur (MCU)
WEBDEV
WindowsLinuxPHPWEBDEV - Code Navigateur
WINDEV Mobile
AndroidWidget AndroidiPhone/iPadWidget IOSApple WatchMac CatalystUniversal Windows 10 App
Autres
Procédures stockées
InternetConnecté (Fonction)
En anglais : InternetConnected
Détermine si une connexion Internet est active sur le poste en cours.
AndroidWidget AndroidiPhone/iPad Permet d'être notifié lors du changement d'état de la connexion Internet.
Exemple
// Connexion Internet active ?
ResConnexion = InternetConnecté()
SI ResConnexion = Vrai ALORS
Info("Une connexion Internet est active")
SINON
Info("Aucune connexion Internet n'est active")
FIN
Syntaxe

Savoir si une connexion Internet est active Masquer les détails

<Résultat> = InternetConnecté()
<Résultat> : Booléen
  • Vrai si une connexion Internet est active sur le poste en cours,
  • Faux dans le cas contraire.
AndroidWidget AndroidiPhone/iPad

Demander une notification lors d'un changement d'état de la connexion Internet Masquer les détails

<Résultat> = InternetConnecté([<Procédure WLangage>])
<Résultat> : Booléen
  • Vrai si la procédure a été associée à la fonction InternetConnecté,
  • Faux dans le cas contraire.
<Procédure WLangage> : Nom de procédure
Procédure WLangage (également nommée "callback") appelée lors d'un changement d'état de la connexion Internet.
Cette procédure est de la forme :
PROCEDURE <Nom de la procédure>(<Etat>)
Le paramètre <Etat> est une constante de type entier correspondant au nouvel état de la connexion Internet.
Il peut prendre les valeurs suivantes :
réseauDéconnectéLe réseau est déconnecté ou inaccessible.
réseauEthernetLa connexion Internet est réalisée par Ethernet.
réseauMobileLa connexion Internet est réalisée en mode mobile : edge, 2G, 3G, 4G, ...
réseauWifiLa connexion Internet est réalisée par Wi-Fi.

Si le paramètre <Procédure WLangage> correspond à une chaîne vide (""), la procédure WLangage précédemment définie ne sera plus appelée.
Remarques
WINDEVEtats et RequêtesCode Utilisateur (MCU)

Firewall

La fonction InternetConnecté utilise une requête ping afin de tester l'accès à Internet. Il faut donc que les paramètres de sécurité du réseau autorise le ping pour que le résultat de la fonction soit pertinent.
Remarque : Le ping est réalisé sur le DNS de Google (6 secondes, 1 essai). Le code équivalent est :
Ping("8.8.8.8", 6000, 1)
AndroidWidget Android Permissions requises
L'utilisation de cette fonction entraîne la modification des permissions requises par l'application.
Permission requise : ACCESS_NETWORK_STATE : cette permission permet aux applications d'accéder à des informations concernant les réseaux.
AndroidWidget AndroidiPhone/iPad Changement d'état de la connexion (syntaxe 2)
  • Appel de la procédure :
    • iPhone/iPad La procédure WLangage n'est appelée qu'en cas de changement de l'état du réseau. Elle n'est pas appelée lors de l'appel de la fonction InternetConnecté. Il est nécessaire d'appeler la fonction InternetConnecté (sans paramètre) pour savoir si la connexion Internet est active ou non.
    • AndroidWidget Android La procédure WLangage est automatiquement appelée lors de l'appel de la fonction InternetConnecté.
  • Une seule procédure peut être associée à la fonction InternetConnecté. Si la fonction InternetConnecté est appelée plusieurs fois avec des noms de procédure différents, la procédure utilisée pour la détection de l'état de la connexion Internet sera remplacée par la nouvelle procédure spécifiée.
  • AndroidWidget Android Si la fonction InternetConnecté est appelée depuis un thread secondaire, la procédure sera appelée dans le thread principal de l'application.
Composante : wd290com.dll
Voir Aussi
Minimum version required
  • Version 9
Comments
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 May 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 Jan. 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 Dec. 2016

Last update: 05/25/2022

Send a report | Local help