[Petya V4sechkin]

Код:

@Echo Off

Del /F /Q ping_result.log 2>nul
For /L %%K In (100, 1, 101) Do (
  For /L %%I In (1, 1, 254) Do (
    Echo 10.0.%%K.%%I
    Ping 10.0.%%K.%%I -n 1 >>ping_result.log
  )
)

[dvassilyev]

получается цикл

[Petya V4sechkin]

dvassilyev, текст ошибки говорит сам за себя.

[dvassilyev]

как решить проблему с кириллицей?

‘в*вЁбвЁЄ* Ping ¤«п 10.0.100.1:

Џ*ЄҐв®ў: ®вЇа*ў«Ґ*® = 1, Ї®«гзҐ*® = 1, Ї®вҐап*® = 0 (0% Ї®вҐам),

ЏаЁЎ«Ё§ЁвҐ«м*®Ґ ўаҐ¬п ЇаЁҐ¬*-ЇҐаҐ¤*зЁ ў ¬б:

ЊЁ*Ё¬*«м*®Ґ = 0¬бҐЄ, Њ*ЄбЁ¬*«м*®Ґ = 0 ¬бҐЄ, ‘।*ҐҐ = 0 ¬бҐЄ

chcp 1251 не помогает

[dvassilyev]

фиг с кирилицей, как сделать так, чтоб в батник записывались только пингуемые хосты, а не все подряд.

[Petya V4sechkin]

dvassilyev, не вопрос:

Код:

@Echo Off
SetLocal EnableExtensions EnableDelayedExpansion

Del /F /Q ping_result.log 2>nul
For /L %%K In (100, 1, 101) Do (
  For /L %%I In (1, 1, 254) Do (
    Ping 10.0.%%K.%%I -n 1 -w 100 >nul
    If !ErrorLevel! == 0 (
      Echo 10.0.%%K.%%I - пингуется
      Echo 10.0.%%K.%%I>>ping_result.log
    ) Else (
      Echo 10.0.%%K.%%I - нет
    )
  )
)

Параметр -w 100 для ускорения процесса (время ожидания 100 миллисекунд).

[dvassilyev]

Большое Спасибо!!! тема решена!