; открытие блокнота
Run('notepad.exe')
; остановка скрипта до появления окна
WinWait('Безымянный — Блокнот')
MsgBox(64, '', 'Скрываем окно')
; скрытие окна
WinSetState('Безымянный — Блокнот', '', @SW_HIDE)
MsgBox(64, '', 'Окно скрыто, отображаем его')
; отображение окна
WinSetState('Безымянный — Блокнот', '', @SW_SHOW)
; активация окна
WinActivate('Безымянный — Блокнот')
Простой пример:а как, а то я читал, но что то не получается!
#include <Constants.au3>
#include <WinAPIEx.au3>
$sLog = ''
$sRar = 'Rar.exe'
$sFile = 'test.txt'
$sFileRar = 'test'
$iPID = Run(@ComSpec & ' /K ' & $sRar & ' a ' & $sFileRar & ' ' & $sFile, '', @SW_HIDE, $STDOUT_CHILD)
While 1
$sLog &= StdoutRead($iPID)
If @error Then ExitLoop
Sleep(10)
WEnd
MsgBox(0, '', _WinAPI_OemToChar($sLog))
; создадим архив из файлов по маске *.doc *.docx *.xls *.xlsx *.txt с максимальным сжатием и 3% информации для востановления
; поместим его в корень системного диска в виде MyDOCS_ГГГГММДД.rar
$dir = @ProgramFilesDir&'\WinRar'
$path = $dir&'\Rar.exe a -m5 -r -rr3p -y -- '&@HomeDrive&'\MyDOCS_'&@YEAR&@MON&@MDAY&'.rar '&@HomeDrive&'\*.doc *.docx *.xls *.xlsx *.txt'
$pid = Run($path,$dir,@SW_HIDE)
ProcessWaitClose($pid)
MsgBox(0,'','Готово!')
ShellExecute(@HomeDrive&'\MyDOCS_'&@YEAR&@MON&@MDAY&'.rar')
-ilog[имя]
Записывать протокол ошибок в файл (эта функция доступна только
в зарегистрированной версии RAR).
Имхо, все просто. Все выполняется в run, так же, как и в твоем примере.в твоем примере даже я не сразу понял что и как
IMHO!madmasles в твоем примере даже я не сразу понял что и как
Хммм....по мойму коммандный вариант, в данном случае, будет удобней.Чего вы мучаетесь, выкиньте окно за экран - пусть оно там и рарит и разраривает, сколько хочет...
Да но окно RAR будет на панели задач в таком случаеЧего вы мучаетесь, выкиньте окно за экран - пусть оно там и рарит и разраривает, сколько хочет...
Run(@ComSpec & ' /K ' & $sRar & ' a ' & $sFileRar & ' ' & $sFile, '', @SW_HIDE)
WinWait('Безымянный — Блокнот')
WinSetState('Безымянный — Блокнот', '', @SW_HIDE)
#include <Constants.au3>
#include <WinAPIEx.au3>
$sLog = ''
$sRar = 'Rar.exe'
$sFile = 'test.txt'
$sFileRar = 'test'
$iPID = Run(@ComSpec & ' /K ' & $sRar & ' a ' & $sFileRar & ' ' & $sFile, '', @SW_HIDE, $STDOUT_CHILD)
While 1
$sLog &= StdoutRead($iPID)
If @error Then ExitLoop
Sleep(10)
WEnd
MsgBox(0, '', _WinAPI_OemToChar($sLog))