Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Аватара для Sanja Alone

Ищу Человека…


Сообщения: 420
Благодарности: 67

Профиль | Сайт | Отправить PM | Цитировать


DenchikK
Рабочий скрипт для установки Agnitum Outpost 2.7
Код: Выделить весь код
AutoItSetOption("TrayIconHide", 1)
BlockInput ( 1 )
AutoItSetOption ( "SendKeyDelay", 15 )
Run ( 'OutpostProInstall.exe' )
WinWaitActive ( 'Select Language' )
ControlCommand ( 'Select Language', '', 'ListBox2', 'SelectString', 'Russian' )
If @error=1 Then
    ControlCommand ( 'Select Language', '', 'ListBox1', 'SelectString', 'Russian' )
EndIf
Send ( '{ENTER}' )
WinWaitActive ( 'Приветствуем' )
Send ( '{ENTER}' )
WinWaitActive ( 'Лицензионное соглашение' )
ControlClick ( 'Лицензионное соглашение', '', 'Button3' )
Send ( '{ENTER}' )
WinWaitActive ( 'Read Me файл' )
Send ( '{ENTER}' )
WinWaitActive ( 'Выберите папку для установки' )
Send ( '{ENTER}' )
WinWaitActive ( 'Начало копирования файлов' )
;Создать программную группу для текущего пользователя
Send ( '{ENTER}' )
;выбрать вариант "Создать программную группу для всех пользователей"
;ControlClick ( 'Начало копирования файлов', '', 'Button5' )
WinWaitActive ( 'Создать новую конфигурацию' )
;Автоматическая настройка
Send ( '{ENTER}' )
;или Ручная настройка
;ControlClick ( 'Создать новую конфигурацию', '', 'Button2' )
WinWait ( 'Мастер конфигурации' )
AutoItSetOption("MouseCoordMode", 2)
;без этой паузы не хочет работать дальше (реально нужно 20-30 сек., но для тестов на VMWare пришлось поставить больше)
Sleep ( 60000 )
WinActivate ( 'Мастер конфигурации' )
;Далее
MouseClick( "left", 400, 330, 1, 0 )
WinWaitActive ( 'Ручная настройка' )
Send ( '{ENTER}' )
WinWaitActive ( 'Установка' )
Send ( '{ESC}' )
Sleep ( 50 )
;лекарство и настройки
RunWait ( 'opst_ui.exe' )
RunWait ( 'settings.exe' )
Sleep ( 50 )
;перенос ярлыков
DirCopy ( @ProgramsDir & '\Agnitum\Outpost Firewall', @ProgramsCommonDir & '\Сеть\Agnitum Outpost Firewall', 1 )
DirRemove ( @ProgramsDir & '\Agnitum', 1 )
;если имеете рабочий ключ, то введите его сюда
;RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Agnitum\Outpost Firewall","Key","REG_SZ","XXX...XX")
;отключить Автообновление
RegWrite("HKEY_LOCAL_MACHINE\SOFTWARE\Agnitum\Outpost Firewall\General","AutoUpdate","REG_DWORD","00000000")
;убрать Аутпост из автозапуска (кому нужно)
;RegDelete("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run", "Outpost Firewall")
BlockInput ( 0 )

Отправлено: 02:24, 22-07-2005 | #71