Код:
AutoItSetOption ("WinTitleMatchMode", 2)
AutoItSetOption ("WinDetectHiddenText", 1)
AutoItSetOption ("SendAttachMode", 1)
WinMinimizeAll ()
Run ( @ScriptDir & "\" & "drweb-432-win-ru.exe" )
WinWaitActive ( "Dr.Web - InstallShield Wizard" )
Send("{ENTER}")
WinWaitActive ( "Установка Dr.Web", "Программа InstallShield® Wizard" )
ControlClick ( "Установка Dr.Web", "Программа InstallShield® Wizard", "Button1")
WinWaitActive ( "Внимание!!!" )
ControlClick ( "Внимание!!!", "", "Button4")
Sleep (100)
ControlClick ( "Внимание!!!", "", "Button1")
WinWaitActive ( "Установка Dr.Web", "ЛИЦЕНЗИОННЫЙ ДОГОВОР" )
ControlClick ( "Установка Dr.Web", "ЛИЦЕНЗИОННЫЙ ДОГОВОР", "Button5" )
Sleep (100)
ControlClick ( "Установка Dr.Web", "ЛИЦЕНЗИОННЫЙ ДОГОВОР", "Button2" )
WinWaitActive ( "Установка Dr.Web", "Прочитайте следующий текст" )
ControlClick ( "Установка Dr.Web", "Прочитайте следующий текст", "Button1" )
WinWaitActive ( "Установка Dr.Web", "Программа установки" )
ControlClick ( "Установка Dr.Web", "Программа установки", "Button1" )
WinWaitActive ( "Установка Dr.Web", "Выберите вид установки" )
Send ("{UP}")
Sleep (100)
ControlClick ( "Установка Dr.Web", "Выберите вид установки", "Button4")
WinWaitActive ( "Установка Dr.Web", "Выберите компоненты для установки" )
ControlFocus ("Установка Dr.Web", "Выберите компоненты для установки","1000")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{DOWN}")
Send ("{SPACE}")
Send ("{DOWN}")
Send ("{SPACE}")
Send ("{DOWN}")
Send ("{SPACE}")
ControlClick ("Установка Dr.Web", "Выберите компоненты для установки","Button2")
WinWaitActive ( "Установка Dr.Web", "Программа установки добавит" )
ControlClick ( "Установка Dr.Web", "Программа установки добавит", "Button2" )
WinWaitActive ( "Установка Dr.Web", "Программа установки располагает" )
ControlClick ( "Установка Dr.Web", "Программа установки располагает", "Button1" )
WinWaitActive ( "Вопрос" )
ControlClick ("Вопрос", "", "Button2")
WinWaitActive ( "Установка Dr.Web", "Да, перезагрузить компьютер сейчас" )
ControlClick ( "Установка Dr.Web", "Да, перезагрузить компьютер сейчас", "Button2" )
ControlClick ( "Установка Dr.Web", "Да, перезагрузить компьютер сейчас", "Button4" )
WinWaitActive ( "ReadWeb" )
WinClose ( "ReadWeb" )
FileCopy ( @ScriptDir & "\" & "drweb32.key", "C:\Program Files\DrWeb\drweb32.key", 1)
