Concernant tes soucis, CPL et photocopieur ça ne fait pas bon ménage. C'est peut être là que se situe le nœud du problème.
Pour tester en ping, tu préfères en batch, VBScript ou AutoIT ? 
En AutoIT je verrais un truc du genre :
1- je crée mon programme simple sur AutoIT (192.167.66.2 étant l'ip à pinger)
Citation :
Global $serveur="192.167.66.2"
$tps_idle=1000*60 ;une minute
AdlibRegister("check_srv",$tps_idle)
While 1
Sleep(int($tps_idle/2)+1)
WEnd
Func check_srv()
Local $resultat_ping,$cause,$str_cause=""
$resultat_ping = Ping($serveur)
$cause=@error
If Not $resultat_ping Then
Switch $cause
Case 1
$str_cause="Machine hors ligne"
Case 2
$str_cause="Machine non atteignable"
Case 3
$str_cause="Mauvaise destination"
Case 4
$str_cause="Autre erreur"
Case Else
$str_cause="Erreur inconnue"
EndSwitch
MsgBox(16,"Problème de ping sur "&$serveur,$str_cause,5)
Return 0
EndIf
Return 1
EndFunc
|
Retrouvé par hasard sur le forum français d'AutoIT. Mais il y a mieux, je regarde dans ma poubelle à scripts chez moi tout à l'heure, avec enregistrement horaire des coupures
2- je met mon programme en tant que service (à voir pour 7 par contre 
)
Et hop, j'ai ma solution maison...
---------------
Grippe ? Coronavirus ? Portez votre masque correctement ! :D
