Page 1 sur 1
[R] Vérifier la connection internet dans un script
Posté : mer. 25 févr. 2009 21:46
par touslesmatins
Bonjour,
Pour securiser un script j'ai besoin de vérifier tout au long du script que la connection internet fonctionne pendant la duree du script. Et de stopper le script si la connection est perdue.
Merci bonne soirée.
Re: [..]Vérifier la connection internet dans un sc
Posté : mer. 25 févr. 2009 21:52
par jbnh
Salut,
Avec la fonction Ping, tu peux checker si ton internet est toujours active. Par exemple tu ping google, un site qui ne plante jamais, et tu vois si tu as un retour :
http://www.autoitscript.com/autoit3/doc ... s/Ping.htm
Re: [..] Vérifier la connection internet dans un script
Posté : mer. 25 févr. 2009 22:52
par touslesmatins
Merci, mais cela fonctionne pas comme je souhaite/
En fait, c'est comment faire pour integrer une verification tout au long d un script et à toutes les etapes.
bonne soiree.
Re: [..] Vérifier la connection internet dans un s
Posté : mer. 25 févr. 2009 22:58
par jbnh
Ca dépend de la manière dont est agencé votre script... Y'a des conditions ? des boucles ? ou simplement des successions de séquences ?
Re: [..] Vérifier la connection internet dans un script
Posté : mer. 25 févr. 2009 23:01
par Tlem
AdlibEnable, une fonction de test et si pas de connexion => Exit.
Re: [..] Vérifier la connection internet dans un s
Posté : mer. 25 févr. 2009 23:16
par jbnh
Sympa, je connaissais pas. Mais à mon avis le problème de le placer pour
touslesmatins sera toujours le même, on verra bien demain
[R] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 02:26
par touslesmatins
Bonsoir,
On ferme.
Merci.
Re: [..] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 03:06
par touslesmatins
Re bonsoir,
Pour ceux que ca interesse j'ai trouvé ce script tres interessant qui indique si vous etes connecté.
Autant que cela serve à d'autre.
Mes paupieres faiblissent.
Bonne nuit.
► Afficher le texte
Code : Tout sélectionner
;check $ret[0] for trueness, and $ret[1] for type of connection according to variables provided..
;-------------------------------------------------------------------------------------------
$INTERNET_CONNECTION_MODEM = 0x1
$INTERNET_CONNECTION_LAN = 0x2
$INTERNET_CONNECTION_PROXY = 0x4
$INTERNET_CONNECTION_MODEM_BUSY = 0x8
$INTERNET_RAS_INSTALLED = 0x10
$INTERNET_CONNECTION_OFFLINE = 0x20
$INTERNET_CONNECTION_CONFIGURED = 0x40
$ret = DllCall("WinInet.dll","int","InternetGetConnectedState","int_ptr",0,"int",0)
If $ret[0] then
;check type of connection
$sX = "Connected !" & @LF & "------------------" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_MODEM) Then $sX = $sX & "MODEM" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_LAN) Then $sX = $sX & "LAN" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_PROXY) Then $sX = $sX & "PROXY" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_MODEM_BUSY) Then $sX = $sX & "MODEM_BUSY" & @LF
If BitAND($ret[1], $INTERNET_RAS_INSTALLED) Then $sX = $sX & "RAS_INSTALLED" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_OFFLINE) Then $sX = $sX & "OFFLINE" & @LF
If BitAND($ret[1], $INTERNET_CONNECTION_CONFIGURED) Then $sX = $sX & "CONFIGURED" & @LF
Else
$sX = "Not Connected"
Endif
MsgBox(4096,$ret[0] & ":" & $ret[1],$sX)
Re: [..] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 08:20
par jl56
Bonjour
Merci pour ce script
mais je viens de le tester avec ma freebox débranché et le résultat est
connected ---------
de même quand elle est branchée
je regarderai de plus pres ce soir
A+ JL56
Re: [..] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 12:14
par touslesmatins
Bonjour,
AIE....
Désolé, je n'avais pas essayé. Je regarde de mon cote egalement.
Bonnne journée
Re: [R] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 19:36
par touslesmatins
Bonsoir, me revoilà... avec un autre bout de code dont je me sert et qui fonctionne. Je le mets ici, pour la collectivité...
Je remercie les intervenants et clos pour ma part la question.
► Afficher le texte
Code : Tout sélectionner
Dim $InetActive = Ping("www.google.com")
If Not $InetActive > 0 Then
MsgBox(4112, "Aucune connection !", "Vérifiez vos connections...",1)
WINactivate("")
Else
EndIf
Re: [R] Vérifier la connection internet dans un script
Posté : jeu. 26 févr. 2009 22:19
par FernandG
Bonsoir,
Concrètement, la première réponse à ton post, celle de jbnh était la bonne
Ping &
Google sont dans ton morceau de code. J'aurais fait de même.
Maintenant l'intervention de Tlem est vraiment pertinente et
tu devrais vraiment y porter attention. Ton code modifié dans la fonction du
AdlibEnable répond amplement à ta demande :
vérifier tout au long du script que la connection internet fonctionne
En tout cas moi aussi je ne connaissais pas et j'y vois vraiment beaucoup d'intérêt dans quelques scripts.
Bonne soirée.
AutoITement.
Re: [R] Vérifier la connection internet dans un script
Posté : ven. 15 mai 2009 13:33
par touslesmatins
YES...
merci