Что нового

Какая функция позволяет выполнять команды через через консоль (CMD)?

Юрий

Новичок
Сообщения
82
Репутация
3
Добрый день. Вот помню когда-то на неё я попадал, но забыл имя)
 

_dron_

Знающий
Сообщения
84
Репутация
8
Код:
$pause = "pause";Команды для cmd
RunWait(@ComSpec & " /c " & $pause)


для изменения переменных среды
Код:
EnvSet ( "envvariable" , "value" )
EnvGet ( "envvariable" )
 

alex33

Скриптер
Сообщения
1,457
Репутация
186
Код:
#include <Process.au3>
_RunDos($sCommand)
 

gagarin74

Новичок
Сообщения
44
Репутация
0
Доброго времени.
Столкнулся с надобностью выполнить через AUTOIT ряд досовских команд.
Запнулся на первом этапе :smile:
Код:
#include <Process.au3>
$sCommand='ping 192.168.88.1 '
_RunDos($sCommand)


Пытался еще так
Код:
RunWait(@ComSpec & ' /c ' & 'ping 192.168.88.1')

Итог везде один - открывается куча CMD окон

В autoit есть встроенная команда пинг
Код:
; Пинг сайта AutoIt каждые 250 миллисекунд
$iPing = Ping("www.AutoItScript.com", 250)
If $iPing Then ; также возможно:  If @error = 0 Then ...
    MsgBox(4096, "Состояние", "В онлайне, задержка ответа: " & $iPing)
Else
    MsgBox(4096, "Состояние", "Произошла ошибка, @error=" & @error)
EndIf


Но мне именно надо выполнить ping 192.168.88.1 -f -n 1 -l 432 > NUL (это в идеале)
Но как писал выше застрял на простом ping 192.168.88.1

Помогите пожалуйста
 

sngr

AutoIT Гуру
Сообщения
1,010
Репутация
408
Код:
#include 'encoding.au3'
$i_PID =Run(@ComSpec & ' /C ping 192.168.88.1  -f -n 1 -l 432', '', @SW_HIDE, 8)
$s_Read=''
While 1
	$s_Read &= StdoutRead($i_PID)
	If @error Then ExitLoop
	Sleep(1)
WEnd
MsgBox(32,'',_Encoding_866To1251($s_Read))
 

gagarin74

Новичок
Сообщения
44
Репутация
0
Друзья, спасибо за ответ.
Я наверное Вас ввожу в заблуждение. Наверное винда касячит.
ну не может она так "правильно работать"
После запуска приведенного выше примера
получаем вот такую красотуhttp://take.ms/ThWc2

Экран полностью заполняется окошками CMD - помогает только перезагрузка.
 
Верх