[bogomolv]

VelDmi
И это правильно! Что-то подобное и я тогда искал, но не доискал...

[Sanja Alone]

VelDmi
bogomolv
Вы, конечно, будете смеяться, но когда я вчера пробовал подобный вариант в кач-ве возможного способа решения обозначенной проблемы, то рез-т был неутешительным:

Код:

RunWait (@comspec & ' /c chcp 1251 && ping.exe 127.0.0.1 > ping.log','', @SW_HIDE)

Файл ping.log получается в OEM-кодировке.

При этом, в конструкции:

Код:

RunWait (@COMSPEC & ' /c chcp 1251 && netsh.exe interface ip dump > netsh.cfg', @SystemDir, @SW_HIDE)

команда chcp реально изменяет кодировку.

Это я к тому, что способ неуниверсальный

[amel27]

bogomolv

Когда-то решал подобную проблему так

ИМХО AutoIT не лучший выбор для подобных задач - не поддерживает работу со стандартными потоками и тормозит на циклах. Для командных утилит хочется "нечто", обрабатывающее транзитный текстовый поток, в тырнете не нашел ничего подходящего, только для файлов... Сначала подумал про VBS - там есть поддержка StdIn и StdOut, но проще всего оказалось на Си. Вот что у меня получилось, пример:

Код:

type file1.txt | dos2win >file2.txt
ping 127.0.0.1 | dos2win >ping.log

Sanja Alone

Это я к тому, что способ неуниверсальный

Можно для надежности воткнуть chcp 866 вначале но и это не гарантия, есть утилиты выводящие только в Win-кодировке.

[bogomolv]

amel27

ИМХО AutoIT не лучший выбор для подобных задач

Так и задача была AutoIt'овская... В скрипте AutoIt нужно было обработать сообщение. Потом выяснилось, что и обрабатывать там особо нечего, и я просто вставил проверку на наличие искомого выражения в неправильной кодировке...

[bogomolv]

amel27
Спасибо за упоминание StdOut.
Обратив внимание на где-то виденное сочетание буковок, освоил новую для себя функцию AutiIt3 - StdoutRead().
Раньше для считывания результатов командной строки использовал перенаправление в >C:\1.txt или CLIPCOPY.EXE.
Теперь все читаю напрямую.
Пример, где отыскиваются и затем запускаются все скрипты, нужные на конкретной стадии автоустановки:

Код:

$dr = Run('%Comspec% /c dir "c:\drivers\*_2.au3" /s /b', '', 0, 6)
 $f  = ''
 While not @error
  $f = $f & StdoutRead($dr)
 Wend
$dr=StringSplit(StringReplace($f,@LF,''),@CR)
For $i=1 To $dr[0]-1
 RunWait('AutoIt3.exe "'&$dr[$i]&'"')
Next

[amel27]

bogomolv
Блин, надо же! Сам давно искал подобное, но пропустил - бум знать.

[saguna]

всем привет!
вопрос: я заметил что скомпиленные в ехе скрипты во время своей работы занимают до 50-80 а иногда и 100% загрузки процессора! замечали ли вы подобное и как с этим бороться.. для примера:

Код:

AdlibEnable("buff", 500)
	While 1
	WEnd	
 Exit

Func buff() 
	$bak = ClipGet()
	MsgBox(0,"","буфер содержит: " & $bak)
	Exit 
EndFunc

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

[NikLok]

bogomolv
Как задействовать в автоите функцию StdoutRead. Ибо версия 3 выдает - незнаю таковой!

[bogomolv]

NikLok
Скачать более позднюю... Судя по ChangeLog, эта функция появилась в первых же бетах после выпуска официальной версии 3.1.1.
Я сейчас пользуюсь версией 3.1.1.102.

[NikLok]

bogomolv
Спасибо! Ща скачаю!