Duber123, Если Вам мило своё решение и крокозябры не пугают - учите лучше английский.
Вот Ваш подправленный вариант - у Вас при потере связи батник завершался
Код:
@echo off
>nul Chcp 437
:Begin
for /f "tokens=* skip=2" %%a in ('ping lenta.ru -n 1 -4') do (
echo %date% %time:~0,8% %%a>>"Z:\Soft_Out\pingtime.txt"
timeout 1 >nul
goto :Begin
)
>nul timeout 1
goto :Begin
Или то же, но всё-таки с кириллицей
Код:
@echo off
>nul Chcp 866
:Begin
for /f "tokens=* skip=2" %%a in ('ping lenta.ru -n 1 -4') do (
Call :Out "%%date%% %%time:~0,8%% %%a"
timeout 1 >nul
goto :Begin
)
>nul timeout 1
goto :Begin
:Out
>nul Chcp 1251
>>"Z:\Soft_Out\pingtime.txt" Echo %~1
rem Echo %~1
>nul chcp 866
Exit /B
