Помогите решить проблему с установкой, не могу понять где ошибка, вот часть кода:
Код:
Func zapusk_programm()
$iCheck = 0
$sMessage = ''
$iPid = Run('D:\Новая папка\ATF-Cleaner\adguardInstaller.exe')
$hWin = WinWait('[Title:Adguard - загрузка компонента; Class:#32770]', '', 3)
If Not $hWin Then
MsgBox(16, 'Error', 'Нет окна :(')
If ProcessExists($iPid) Then ProcessClose($iPid)
Exit -33
EndIf
$hProgress = ControlGetHandle($hWin, '', '[CLASS:msctls_progress32; INSTANCE:1]')
$iStart = TimerInit()
While $iCheck < 100
$iCheck = _SendMessage($hProgress, $PBM_GETPOS)
ConsoleWrite(StringFormat('%d%', $iCheck) & @LF)
Sleep(500)
If TimerDiff($iStart) > 200000 Then ExitLoop
WEnd
If $iCheck < 100 Then
MsgBox(16, 'Error', 'Не дождались окончания установки :(')
WinClose($hWin)
Exit -77
EndIf
ControlClick($hWin, 'Д&алее', '[CLASS:Button; INSTANCE:1]')