version 6.8.1
IT_PPPStatus {(profilPPP)} Entier
| Paramètre | Type | Description | |
| profilPPP | Alpha | Nom de connexion à distance (chaîne vide sous | |
| Mac OS, nom optionnel sous Windows) | |||
| Résultat | Entier | 1 = 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.