Ping + Rapport

Version imprimable

Ping + Rapport

Bonjour,

J'ai trouvé le code suivant sur Internet pour pinger à intervale régulier une station.
Le code fonctionne et m'indique bien dans un log quand le ping répond.
Ce que je ne parviens pas à réaliser c'est qu'il fasse de même mais quand le ping ne répond pas...
Pouvez-vous SVP m'aider à ce sujet.
Merci.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 @echo off cls set marche= echo Log file des ping. > ping.txt echo ------------------ >> ping.txt echo Ne pas fermer la fenetre echo Arret du programe par CTRL-C :loop for %%a in (172.17.51.49 ) do call :pinging %%a goto loop goto :EOF :pinging echo ping en cours de %1 ping -n 1 %1 | find "TTL=" if ERRORLEVEL 1 goto attente echo %date% %time% %1 repond >> ping.txt echo %marche% | find "*%1*" if not ERRORLEVEL 1 goto attente :attente echo Attente de 10 secondes ping -n 10 127.0.0.1 > nul if errorlevel 1 exit goto :EOF

Salut,

Code:

1
2
3
4
5
...
:attente
echo %date% %time% %1 ne répond pas>> ping.txt
...

Ca ne fonctionne pas. Voila les réponses que j'obtiens dans le log des ping :

Log file des ping.
------------------
04/12/2008 9:43:27,37 172.17.51.49 repond
04/12/2008 9:43:27,40 172.17.51.49 ne répond pas
04/12/2008 9:43:36,46 172.17.51.49 repond
04/12/2008 9:43:36,49 172.17.51.49 ne répond pas
04/12/2008 9:43:45,53 172.17.51.49 repond
04/12/2008 9:43:45,56 172.17.51.49 ne répond pas
04/12/2008 9:43:54,61 172.17.51.49 repond
04/12/2008 9:43:54,64 172.17.51.49 ne répond pas
04/12/2008 9:44:03,68 172.17.51.49 repond
04/12/2008 9:44:03,71 172.17.51.49 ne répond pas

La station est pourtant bien connectée et répond au ping correctement.

Mon code avec les modifs indiquée pour info :
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 @echo off cls set marche= echo Log file des ping. > ping.txt echo ------------------ >> ping.txt echo Ne pas fermer la fenetre echo Arret du programe par CTRL-C :loop for %%a in (172.17.51.49 ) do call :pinging %%a goto loop goto :EOF :pinging echo ping en cours de %1 ping -n 1 %1 | find "TTL=" if ERRORLEVEL 1 goto attente echo %date% %time% %1 repond >> ping.txt echo %marche% | find "*%1*" if not ERRORLEVEL 1 goto attente :attente echo %date% %time% %1 ne répond pas>> ping.txt echo Attente de 10 secondes ping -n 10 127.0.0.1 > nul if errorlevel 1 exit goto :EOF

J'y ai apporté quelques modifications, notamment au niveau de la structure.
J'espère que ça répondra à ton besoin.

enjoy;

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
@echo off
cls
set ip1=172.17.51.49
echo Log file des ping. > ping.txt
echo ------------------ >> ping.txt
echo Ne pas fermer la fenetre
echo Arret du programe par CTRL-C

:loop
for %%i in (%ip1%) do call :pinging %%i
goto loop
goto :eof

:pinging
set dts=%date% %time%
ping -n 1 %1 | find /i "ttl=">NUL
if %errorlevel%==1 echo %1 :PAS DE REPONSE& echo %1 :PAS DE REPONSE [%dts:~0,-3%]>>ping.txt
if %errorlevel%==0 echo %1 :OK& echo %1 :OK             [%dts:~0,-3%]>>ping.txt
ping -n 10 127.0.0.1>NUL
goto :eof

Merci, ça fonctionne ! ;)

Sinon, j'étais parvenu à réaliser ça :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
@echo off
echo Log file des ping du Dimanche 07/12/08 entre 7h et 12h : > ResultPingDimanche.txt
echo -------------------------------------------------------- >> ResultPingDimanche.txt

echo Ne pas fermer la fenetre, ping en cours...

echo Arret du programe par CTRL-C
 

SETLOCAL EnableDelayedExpansion
set delay=300

:loop

for /f "delims=" %%i in (liste.txt) do (
ping %%i>nul

 if !errorlevel! NEQ 1 (echo ping FS01 [%%i] le %date% à %time% = OK >> ResultPingDimanche.txt) else (echo ping FS01 [%%i] le %date% à %time% = NON OK >> ResultPingDimanche.txt)
ping -n %delay% 127.0.0.1 >NUL:

)

goto loop

Fonctionne également.
@+ :)