IT_PPPStatus

4D - Documentation   Français   English   German   Commandes Internet de 4D, Sommaire   Commandes Internet de 4D, Index   Retour   Précédent   Suivant

version 6.8.1


IT_PPPStatus {(profilPPP)} Entier

ParamètreTypeDescription
profilPPPAlphaNom de connexion à distance (chaîne vide sous
Mac OS, nom optionnel sous Windows)
RésultatEntier1 = connecté, 0 = en cours de connexion, -1 = erreur

Description

La commande IT_PPPStatus vous permet de tester le statut d'une connexion à distance ouverte à l'aide de la commande IT_PPPConnect ou manuellement.

Le paramètre profilPPP désigne la connexion à tester. Sous Windows, ce paramètre est optionnel mais peut être utile pour garantir l'exécution de la commande quelle que soit la configuration réseau de l'utilisateur.

Sous Windows

• Si profilPPP est passé et est valide, le statut de la connexion spécifiée est retourné.

• Si profilPPP est omis ou contient une chaîne vide, IT_PPPStatus retourne :

- si plusieurs connexions sont ouvertes, -1

- si une seule connexion est ouverte, le statut de la connexion.

Sous Mac OS

Le paramètre profilPPP est ignoré.

IT_PPPStatus retourne un entier indiquant le statut de la connexion :

• 1 si la connexion est établie,

• 0 si la connexion est en cours d'établissement,

• -1 si la connexion a échoué ou s'il n'y a aucune connexion.

Exemple

      `Méthode GetMessages (méthode exécutée dans un process)
   Si(mPPPConnect($vPPPProfil; 120))
      $vErrCode:=IT_MacTCPInit 
      Si($vErrCode=0)
         $vErrCode:=POP3_Login...
         ...
      Sinon
         ALERTE("Connection failed")
      Fin de si
   Fin de si

      `Méthode mPPPConnect
   C_BOOLEEN($0) `Vrai si on est déjà connecté, Faux si la connexion a échoué
   C_TEXTE($1) `Chaîne vide sous Mac OS, Nom sous Windows
   C_ENTIER($2)  `Timeout en secondes

   Si (IT_PPPStatus =1)
      $0:=Vrai  `On est déjà connecté
   Sinon
      $vTimeoutLength:=$2
      $vTimeout:=Faux
      $vErr:=IT_PPPConnect($1)
      Si($vErr=0)
         $vStart:=Heure courante
         Repeter
            ENDORMIR PROCESS(Numero du process courant;30)
            $vStatus:=IT_PPPStatus($1)
            $vTimeout:=((Heure courante-$vStart)>$vTimeoutLength)
         Jusque (($vStatus=1) | $vTimeout) `Connexion ou timeout 
         Si(Non($vTimeout)) 
            $0:=Vrai  `Connexion
         Fin de si
      Fin de si  `… $Err = 0
   Fin de si.

Référence

IT_PPPConnect, IT_PPPDisconnect.


4D - Documentation   Français   English   German   Commandes Internet de 4D, Sommaire   Commandes Internet de 4D, Index   Retour   Précédent   Suivant