Что нового

Скрипт Мастер нового оборудования

RealBoy

Новичок
Сообщения
1
Репутация
0
Уважаемые форумчане поделитесь скриптом для "Мастер нового оборудования"
что бы при обнуружении нового оборудования кликал делее-далее-готово! :IL_AutoIt_1:
 

madmasles

Модератор
Глобальный модератор
Сообщения
7,790
Репутация
2,322
RealBoy
Попробуйте так
Код:
$sTitle = 'Мастер нового оборудования'
$sText_1 = 'только в этот раз'
$sText_2 = 'Автоматическая установка'
$iWait = 100000
$hWin = WinWait($sTitle, $sTitle, 5)
If Not $hWin Then
	MsgBox(16, $sTitle, 'Нет окна "' & $sTitle & '"')
	Exit
EndIf
For $i = 1 To 10
	If StringInStr(ControlGetText($sTitle, '', 'Button' & $i), $sText_1) Then
		ControlClick($hWin, '', 'Button' & $i)
		ExitLoop
	EndIf
Next
Sleep(500)
For $i = 1 To 10
	If StringInStr(ControlGetText($sTitle, '', 'Button' & $i), 'Далее') Then
		ControlClick($hWin, '', 'Button' & $i)
		ExitLoop
	EndIf
Next
Sleep(500)
For $i = 1 To 10
	If StringInStr(ControlGetText($sTitle, '', 'Button' & $i), $sText_2) Then
		ControlClick($hWin, '', 'Button' & $i)
		ExitLoop
	EndIf
Next
Sleep(500)
For $i = 1 To 10
	If StringInStr(ControlGetText($sTitle, '', 'Button' & $i), 'Далее') Then
		ControlClick($hWin, '', 'Button' & $i)
		ExitLoop
	EndIf
Next
Sleep(500)
$iStart = TimerInit()
While 1
	If StringInStr(WinGetText($sTitle), 'Готово') Then
		ExitLoop
	EndIf
	If TimerDiff($iStart) >= $iWait Then
		ExitLoop
	EndIf
	Sleep(1000)
WEnd
For $i = 1 To 10
	If StringInStr(ControlGetText($sTitle, '', 'Button' & $i), 'Готово') Then
		ControlClick($hWin, '', 'Button' & $i)
		ExitLoop
	EndIf
Next
If WinExists($hWin) Then
	WinClose($hWin)
EndIf
MsgBox(64, $sTitle, 'Готово')
 
Верх