[решено] Переделать VBS в BAT - Запускаем ping и ожидаем завершения его работы

Компьютерный форум OSzone.net (http://forum.oszone.net/index.php)

- Скриптовые языки администрирования Windows (http://forum.oszone.net/forumdisplay.php?f=102)

Переделать VBS в BAT - Запускаем ping и ожидаем завершения его работы

Помогите переделать этот VBS в BAT

Код:

set WshShell = CreateObject("WScript.Shell")

 'Запускаем ping и ожидаем завершения его работы

 Return = WshShell.Run("ping 94.100.191.201 -n 2 -w 1", 0, true)

 If Return=0 then 

 WScript.Echo "Интернет работает"

 Else WScript.Echo "Интернет не работает"

 End If

Надо что бы Bat создавал файл vbs c содержимыми функциями которые указаны выше в папке %temp% и запускал его.

И встроить его в эту функцию, вместо - goto test

Код:

If /I "%i%"=="test" (goto test)

root221, указанные действия решаются на bat вот таким однострочником:

Код:

ping 94.100.191.201 -n 2 -w 1|Find /I "ttl=">nul&&Echo Интернет работает||Echo Интернет не работает

А встраивание в тот ваш скрипт с выбором пункта происходит вот так:

Код:

If /I %i%==test (ping 194.100.191.201 -n 2 -w 1|Find /I "ttl=">nul&&Echo Интернет работает||Echo Интернет не работает&GoTo :EOM)