Script ping - extract data

Version imprimable

1 pièce(s) jointe(s)

Bonjour,
je cherche à me créer un petit script pour surveiller mon parc IT sur certain matériel.
pour cela j'aimerais pouvoir ping à des moments de la journée une liste d'adresse IP et récupérer dans un fichier les infos suivantes
Date/Heure/IP/Statut

ex :
20190212/10:00/192.168.0.1/OK
20190212/10:00/192.168.0.25/OK
20190212/10:00/192.168.0.100/KO
20190212/10:00/192.168.0.122/OK
20190212/10:30/192.168.0.1/OK
20190212/10:30/192.168.0.25/OK
20190212/10:30/192.168.0.100/OK
20190212/10:30/192.168.0.122/OK
20190212/11:00/192.168.0.1/KO
20190212/11:00/192.168.0.25/OK
20190212/11:00/192.168.0.100/OK
20190212/11:00/192.168.0.122/OK

j'ai pour le moment fait un script en batch mais le retour ne convient pas pour le jour ou je vais avoir 50 ip à surveiller toutes les 30 min.
Code:

1 2 3 4 5 6 7 8 9 10 11 12 13 14 @echo off echo ---------------------------------------------- >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" echo. >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" echo %date% >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" echo %time% >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.243.160 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.242.192 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.242.186 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.243.161 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.242.188 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.242.223 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.242.220 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" ping.exe 10.33.243.187 -n 1 >> "R:\06 - INFORMATIQUE\Interne SI\SI\IP_test.txt" pause
résultat de mon batch en PJ
est ce que quelqu'un aurait déjà fait ce genre de choses....

:salut:

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
30
31
32
@echo off
Title Muti-Ping Tester
Setlocal EnableDelayedExpansion
mode 70,35 & color 0B
set "URLS=URLS.txt"
set "LogFile=PingResults.txt"
If exist %LogFile% Del %LogFile%
for /f "usebackq delims=" %%a in ("%URLS%") do (
    Call :StringFormat "%%a"
    for /f "tokens=2 delims=[]" %%b in ('ping -n 1 !URL!') do set "ip=%%b"
        for /f "skip=1" %%x in ('wmic os get localdatetime') do if not defined MyDate set MyDate=%%x
        set Today=!MyDate:~0,4!!MyDate:~4,2!!MyDate:~6,2!/!TIME:~0,2!:!TIME:~3,2!
        ping -n 1 !URL!>nul && set "msg=!Today!/!URL!/!ip! - OK" && echo !msg!  || set "msg=!Today!/!URL!/!ip! - KO" && echo !msg!
        echo !msg! >> "%LogFile%"
    )
)
EndLocal
Exit
::*************************************************************************************
:StringFormat <URL>
(    
    echo Function StringReplace(Str^)
    echo     Str = Replace(Str,"http://",""^)
    echo    Str = Replace(Str,"https://",""^)
    echo     StringReplace = str
    echo End Function
    echo wscript.echo StringReplace("%~1"^)
)>"%tmp%\%~n0.vbs"
for /f "delims=" %%a in ('Cscript /nologo "%tmp%\%~n0.vbs"') do ( set "URL=%%a" )
If Exist "%tmp%\%~n0.vbs" Del "%tmp%\%~n0.vbs"
exit /b
::*************************************************************************************

16/04/2019, 15h03
aculy

2 pièce(s) jointe(s)

bonjour,
je pensais que personne ne m'avait répondu....
le mail était dans mes spams...
du coup désolé de ne pas avoir répondu.... et j'ai pu regarder ce qui avait été proposé.

j'ai ce message d'erreur
Pièce jointe 467263

et cela n'écrit que çà dans le fichier
Pièce jointe 467262

je vais essayer de décrypter l erreur.
16/04/2019, 15h07
aculy

pour information dans le fichier URLS.TXT j'ai mis une IP libre (qui devrait me retourner un KO) et mon IP de machine (qui devrait me retourner un OK)
17/04/2019, 08h59
ericlm128

Citation:

j'ai pour le moment fait un script en batch mais le retour ne convient pas pour le jour ou je vais avoir 50 ip à surveiller toutes les 30 min.

Pourquoi, quelle est la raison ?
17/04/2019, 15h24
aculy

Citation:

Envoyé par ericlm128

Pourquoi, quelle est la raison ?

??
comprends pas la question ???
la raison de mon besoin ?
17/04/2019, 20h00
ericlm128

Non la raison de ça.

Citation:

J'ai pour le moment fait un script en batch mais le retour ne convient pas pour le jour ou je vais avoir 50 ip à surveiller toutes les 30 min.
18/04/2019, 08h57
aculy

1 pièce(s) jointe(s)

le fichier qui en sort en intraitable par la suite..
j'ai le batch qui lance les ping
et le script qui lance le batch régulièrement.
fichier de sorti en PJ

En m'appuyant sur l'exemple de hackoofr

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
@echo off
Setlocal EnableDelayedExpansion
 
set "ip=ip.txt"
set "LogFile=PingResults.txt"
If exist "%~dp0%LogFile%" Del "%~dp0%LogFile%"
for /f "usebackq delims=" %%a in ("%~dp0%ip%") do (
	for /f "skip=1" %%b in ('wmic os get localdatetime ^| findstr /r /c:"."') do set MyDate=%%~b
	set "msg=!MyDate:~,8!/!MyDate:~8,2!:!MyDate:~10,2!/%%~a/"
	ping -n 1 "%%~a"
	(ping -n 1 "%%~a">nul&&echo !msg!OK||echo !msg!KO) >> "%~dp0%LogFile%"
)
 
pause

14/05/2019, 17h48
aculy

changement de langage
--> C#
ici
cela fonctionne