BATCH – Scripts Windows para chequear disponibilidad de red internet.-

Este SCRIPT realizado en MS-DOS para ejecutarlo en WINDOWS, me sirve para poder reclamar a mi proveedor de internet, las veces en que no tengo red durante el día (son bastantes en que el router se resetea solo).

@echo off 

:comienzo
set log=conect.log
set url=www.sii.cl
call :fechor
echo %fecha% %hora% Comienza chequeo de red operativa. Ping a www.sii.cl cada 20 segundos >> %log%

:consulta
call :pinger
ping -n 20 127.0.0.1 > nul
if %resp%==0 (goto :consulta)
call :fechor
set redoff=%fecha% %hora%

:sinred
call :pinger
if %resp%==1 (goto :sinred)
call :fechor
echo %redoff% hasta %fecha% %hora% sin acceso a red. >> %log%
goto :consulta

:fechor
SET dia=%DATE:~,2%
SET mes=%DATE:~3,2%
SET ano=%DATE:~6,4%
SET hor=%TIME:~,2%
SET min=%TIME:~3,2%
SET seg=%TIME:~6,2%
set fecha=%dia%-%mes%-%ano%
set hora=%hor%:%min%:%seg%
goto:EOF

:pinger
ping %url% -w 700 2>nul | find "TTL=" >NUL && set resp=0 || set resp=1
goto:EOF

El log que genera esta con el siguiente formato :

03-02-2015 21:39:24 Comienza chequeo de red operativa. Ping a www.sii.cl cada 20 segundos
03-02-2015 21:40:07 hasta 03-02-2015 21:41:10 sin acceso a red.
03-02-2015 21:43:02 hasta 03-02-2015 21:44:01 sin acceso a red.

Esta entrada fue publicada en BATCH - DOS. Guarda el enlace permanente.