Page 1 sur 1
[R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 15:36
par ELGAMALI
Bonjour
Je cherche un script qui permet de tester dans un 1er temps que l’utilisateur de l’application est déjà connecté sur le net ou pas.
Merci
Re: [..] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 15:43
par Yogui
Bonjour,
La commande PING me semble répondre à votre question.
Code : Tout sélectionner
$var = Ping("www.AutoItScript.com",250)
If $var Then; also possible: If @error = 0 Then ...
Msgbox(0,"Status","Online, Utilisateur connecté au web")
Else
Msgbox(0,"Status","An error,utilisateur non connecté au web (erreur" & @error&")")
EndIf
Re: [R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 16:22
par ELGAMALI
Merci pour ta réponse
Ce que je cherche si la connexion est bien activée (ouverte pour recevoir et envoyer messages).
Le script de l'aide ne marche pas??!!
Re: [..] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 16:26
par mikell
Bah si, le ping est ce qu'il te faut
Moi j'utilise ça en tête de script, mais on peut aussi bien faire une boucle qui va vérifier plusieurs fois avant de quitter
Code : Tout sélectionner
While 1
$ping = Ping("www.google.fr", 500)
If $ping = 0 Then
Msgbox(48,"Fatal Error", " Pas de connexion internet ")
Exit
Else
Exitloop
EndIf
Wend
Re: [R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 16:48
par ELGAMALI
Testez le script est vous allez voir que sa ne marche pas
Re: [..] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 16:53
par mikell
Le script de l'aide te renvoie quel numéro d'erreur ?
Re: [..] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 16:58
par ricky
Hello,
@mikell : ta méthode ne marche pas à tous les coups. Au boulot, le ping est désactivé, donc avec ta commande dans ton script "Surveillance de réponse sur le forum" celui-ci quittait de suite.
Re: [R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 17:20
par ELGAMALI
Bonsoir
Le scripte il avait besoin d'une petite correction pour qu'il marche correctement.
Code : Tout sélectionner
$ping = Ping("www.google.fr", 500)
If $ping = 0 Then Msgbox(48,"Fatal Error", " Pas de connexion internet ")
If $ping <> 0 Then Msgbox(48,"Fatal Error", " connexion internet active ")
Re: [..] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 17:35
par mikell
ricky a écrit : ta méthode ne marche pas à tous les coups. Au boulot, le ping est désactivé, donc avec ta commande dans ton script "Surveillance de réponse sur le forum" celui-ci quittait de suite.
Ah parce que tu fais de la surveillance de forum autoit au boulot toi ?
Tsss Tsss
Valait mieux qu'il quitte de suite, parce que sans ce test, pas de connexion => monstrueux plantage avec blocage d'explorer...
Blague à part s'il existe une autre méthode que le ping pour tester une connexion internet, je suis preneur ^^
@elgamali
Heu, " If $ping = 0 Then ... " + " If $ping <> 0 Then "
c'est la même chose que " If $ping = 0 Then ... Else... "
Re: [R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 17:43
par Yogui
ELGAMALI a écrit :Bonsoir
Le scripte il avait besoin d'une petite correction pour qu'il marche correctement.
Code : Tout sélectionner
$ping = Ping("www.google.fr", 500)
If $ping = 0 Then Msgbox(48,"Fatal Error", " Pas de connexion internet ")
If $ping <> 0 Then Msgbox(48,"Fatal Error", " connexion internet active ")
C'est vrai faire deux conditions là où je n'en écris qu'une c'est de l'amélioration de code...
en fait le plus court est d'écrire
Faire deux conditions à la suite du même test (vrai faux)ne sert à rien puisque si l'un est vrai l'autre ne l'est pas.
concernant le ping c'est assez rare de le bloquer en sortie comme quoi ça arrive
Re: [R] Tester si la connexion est bien activée
Posté : lun. 16 janv. 2012 19:39
par ELGAMALI
Yogui a écrit : C'est vrai faire deux conditions là où je n'en écris qu'une c'est de l'amélioration de code...
en fait le plus court est d'écrire
Vous avez raison il serait très intéressant d'améliorer le dit script et lui donné une forme plus professionnel.
Merci
Re: [R] Tester si la connexion est bien activée
Posté : mar. 17 janv. 2012 00:02
par ELGAMALI
Bonsoir
J'ai tester le scripte suivant:
Code : Tout sélectionner
#NoTrayIcon
$list = ProcessList()
For $j=1 to $list[0][0]
$i=0
Next
$ping = Ping("www.google.fr", 500)
If $ping = 0 Then
Msgbox(48,"Fatal Error", "La connexion au réseau internent a échoué, soit que votre modem n’est pas installer!, ou soit le niveau du signal du réseau est trop bas!.")
Exit
EndIf
For $j=1 to $list[0][0]
$i=0
Next
If $ping <> 0 Then ;Msgbox(48,"Fatal Error", " connexion internet active, 10 ")
EndIf
il marche à tous les coups et et avec toutes les connexions qui existent même avec la connexion satellite.
à bien tôt