[megaloman]

те адреса по которым пинг есть вынести в отдельный файл с именем компьютера и ip адресом

Фраза совершенно непонятна: то ли надо получить один текстовый файл с перечислением имен компьютеров и ip, то ли для каждого ip создать отдельный txt-файл.

Вот вариант с одним текстовым файлом

Код:

@Echo Off
cls

chcp 437 >nul

Set "FileIp=ips.txt"
Set "FileOut=%~dpnx0.ips.txt"

Del "%FileOut%" 2>nul 
FOR /F "usebackq" %%p IN ("%FileIp%") DO Call :Pinguin "%%p"

GoTo :Eof

:Pinguin
	Echo %~1
	FOR /F "usebackq skip=1 tokens=2,3 delims= " %%i IN (`ping -4 -n 1 -a %~1`) DO (
		If /I "%%j"=="[%~1]" Echo %%i %%j>>"%FileOut%"
		GoTo :Eof
	)
GoTo :Eof

У меня комп не в домене, команда ping нигде не выдаёт строку "domen.name". Поэтому возможно этот мой вариант у Вас не отработает.

Хотелось бы получить от Вас файл после выполнения батника для нескольких пингующихся и непингующихся узлов

Код:

@Echo Off
chcp 437 >nul

>ips_prom_res.txt (FOR /F %%A IN (ips.txt) DO ping -4 -n 1 -a %%A)

У меня выдача ping имеет вид

Код:

Pinging My_Comp_Name [192.168.1.5] with 32 bytes of data:
Reply from 192.168.1.5: bytes=32 time<1ms TTL=128

Ping statistics for 192.168.1.5:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 0ms, Maximum = 0ms, Average = 0ms

Pinging My_Comp_Name [127.0.0.1] with 32 bytes of data:
Reply from 127.0.0.1: bytes=32 time<1ms TTL=128

Ping statistics for 127.0.0.1:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),
Approximate round trip times in milli-seconds:
    Minimum = 0ms, Maximum = 0ms, Average = 0ms

Pinging 192.168.1.55 with 32 bytes of data:
Reply from 192.168.1.5: Destination host unreachable.

Ping statistics for 192.168.1.55:
    Packets: Sent = 1, Received = 1, Lost = 0 (0% loss),

Pinging 111.111.111.111 with 32 bytes of data:
Request timed out.

Ping statistics for 111.111.111.111:
    Packets: Sent = 1, Received = 0, Lost = 1 (100% loss),