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

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [Архив - Часть 1.1] AutoIt скрипты

Закрытая тема
Настройки темы
[Архив - Часть 1.1] AutoIt скрипты

Ветеран


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

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


Изменения
Автор: Vadikan
Дата: 25-01-2008
Внимание!
Тема переведена в архивное состояние





(настоятельно рекомендуется к прочтению/поиску)


Руководство к действию по работе c AutoIt.

Ну во превых, к моему удивлению, утилита (и компонента activeX) уже успела обновиться до версии 3.1.0 (7 фев 2005) и заполучить множество дополнительных функций (появилась возможность создавать граф. интерфейс к своим скриптам . К сожалению русскоязычной справки пока нет.
Скачать можно здесь

Почему лишь руководство? Потомучто к программе прилагается обширная справка с описанием самой программы и команд, в т.ч. и на русском языке. Основные команды используемые в нашем случае в новой версии не поменялись. Я рассмотрю лишь самые азы, кот. необходимы для создания самого простого скрипта, в принципе этого достаточно для установки практически любой программы, просто знание дополнительных команд позволят сделать скрипт более компактным и красивым.

На сегоднящний день имеется 2 распространненых способа по автоматизации установки
1. Использование утилиты AutoIt и файлов скриптов au3, кот. в последствии можно компилировать в исполнимые файлы exe, не требующие утилиты AutoIt.exe
2. Использование VBS и JS скриптов, этот способ можно расширить за счет использования activeX компоненты - autoitX (к слову сказать - я пользуюсь именно этим методом).

Для примера создадим скрипт по установки Alcohol120%. Самое неприятное в его установки это окно с подтверждением установки SCSI драйвера. Это мы и поправим.
Цитата Скрипт alc120.au3:
'Блокировка клавы и мышки
BlockInput(1)

'Ожидание окна установки SCSI адаптера
WinWait ("Мастер нового оборудования","", 0)

'Пауза на 500 мс на всякий случай, для слабых машин, чтобы окно успело обновиться
Sleep(500)

'Послать в активное окно нажатие клавиши ENTER
send("{ENTER}")

WinWait ("Мастер нового оборудования","Для закрытия мастера", 0)

Sleep(1000)

'Послать в указанное окно ControlClick для кнопки с назв. класса Button9
ControlClick ("Мастер нового оборудования","Для закрытия мастера", "Button9")

'Снятие блокировка клавы и мышки
BlockInput(0)
Скрипт и утилита autoit3.exe будет лежать рядом с дистром, и будет запускаться перед запуском дистрибутива.
Создадим файл с названием alc120.au3 в win1251 кодировке
Теперь нужно заблокировать клавиатуру и мышь чтобы наглый пользователь не нажал что-нибудь или не сменил случайно фокус с активного окна во время работы скрипта.

'Блокировка клавы и мышки (многие команды предназначены для посыла в активное окно)
BlockInput(1)

Скрипт запустился и теперь ожидает запуска инсталяра и появление сигнального окна, кот. сообщит скрипту что программа запущена и можно продолжать выполнение скрипта. Для того чтобы узнать название окна нужно использовать спец. утилитку AU3Info.exe, кот. входит в комплект дистрибутива autoit. Запускаем ее, после чего запускаем дистрибутив Alcohol120% и доходим до того места где вылазит окно Мастер нового оборудования с вопросом об установке SCSI адаптера. Активируем его кликнув по заголовку мышкой и жмем CTRL+ALT+F, в результате в окне AU3Info информация о текущем окне зафиксируется:
Цитата:
>>>>>>>>>>>> Window Details <<<<<<<<<<<<<
Title: Мастер нового оборудования
Class: #32770

копируем название этого заголовка, там же можно посмотреть текст наличествующий в этом окне, если необходимо.
Цитата:
>>>>>>>>>>> Visible Window Text <<<<<<<<<<<
Завершение работы мастера нового оборудования
Мастер завершил установку программ для:
SCSI/RAID хост-контроллер
Для закрытия мастера нажмите кнопку "Готово".
< &Назад
Готово
Отмена

'Ожидание окна установки SCSI адаптера (в зависимости от языка винды заголовок будет разным)
WinWait ("Мастер нового оборудования","", 0)

WinWait ( "title" [, "text" [, timeout]] )
title - название окна кот. ожидает скрипт для продолжения работы,
text - любой текст в этом окне, нужен если последующее окно после нажатия кнопки, имеет такой же заголовок
timeout - таймаут, время через кот. ожидание прекратиться, 0 - никогда


'Пауза на 500 мс на всякий случай, для слабых машин, чтобы окно успело обновиться
Sleep (500)

После того как окно с нужнымм заголовком появилось, скрипт должен послать активному окну клавишу ENTER, в результате будет нажата кнопка по умолчанию (в нашем случае "далее"). Список клавиатурных нажатий см. в справке.

'Послать в активное окно нажатие клавиши ENTER
Send ("{ENTER}")

Далее продолжится устанока SCSI адаптера вплоть до появление последнего окна с предложением закрыть мастер.
'Ожидание окна окончания установки SCSI адаптера
WinWait ("Мастер нового оборудования","Для закрытия мастера", 0)

'Ждем 600 мс. для того чтобы окно успело обновиться
Sleep (600)

Теперь нам нужно нажать клавишу готово, можно воспользоваться тем же методом что и выше Send ("{ENTER}"), но для разнообразия воспользуемся другим, не всегда ведь нам нужна будет кнопка по умолчанию кот. нажимается клавшей ввод. Используем метод ControlClick, кот. позволяет кликнуть по определенному объекту в окне исходя из его идентификатора (Control ID) или Названия Класса (ClassName). Чтобы узнать то или другое используем вышеупомянутую утилитку AU3Info, только теперь подводим курсор на нужную кнопку и смотрим на параметр "ClassNameNN", копируем значение Button9, и используем в скрипте.
Цитата:
>>>>>>>>>>> Control Under Mouse <<<<<<<<<<<
Size: X: 327 Y: 327 W: 75 H: 23
Control ID: 12325
ClassNameNN: Button9
Text: Готово

'Послать в указанное окно ControlClick для кнопки с назв. класса Button9
ControlClick ("Мастер нового оборудования","Для закрытия мастера", "Button9")

ControlClick ( "title", "text", controlID [, button] [, clicks]] )
title - название окна кот. ожидает скрипт для продолжения работы,
text - любой текст в этом окне, нужен если последующее окно после нажатия кнопки, имеет такой же заголовок
controlID - собственно идентификатор
button - какую кнопку использовать "left", "right" или "middle
clicks - количество кликов


Последнее что нужно сделать - снять блокировку с клавы и мышки.
'Снятие блокировка клавы и мышки
BlockInput(0)

После этого скрипт завершается, а алкоголик заканчивает установку.

Теперь нужно проверить работу скрипта.
Cоздаем бат-файл:
Цитата alc.bat:
start C:\Test\AutoIt3.exe alc120.au3
msiexec.exe /passive /norestart /i "C:\Test\setup.msi"
В процессе выполнения скрипта в трэе появится занчок с буквой A, кот. показыает что скрипт выполняется, после отработки он исчезнет, если в процессе установки возникли проблеммы жмем CTRL+ALT+DEL (даже если клава заблокирована) и снимаем процесс autoit3.exe.

Если скрипт отлажен и проблем не возникает, для удобства можно скомпилировать его в .exe файл (содержит в себе утилиту autoit3.exe и скрипт .au3, кот. исполняется).
Для этого можно воспользоваться утлитой Aut2Exe.exe (входит в комплект с дистрибутивом autoit3).
Если нужно будет в последствии что-то изменить в скрипте, то полученный .exe файл можно будет конвертнуть назад в .au3 с помощью другой утилиты Exe2Aut.exe

Что касается 2го способа установки, то просто приведу пример, установки Alcohol120%, кот. использую я
Цитата alc120.vbs:

Dim WshShell, fso, objArgs, AutoIt, dir

Set WshShell = WScript.CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
Set AutoIt = WScript.CreateObject("AutoItX.Control")
On Error Resume Next

' Path to current vbs folder to successfully launch script in WPI
dir = fso.GetParentFolderName(WScript.ScriptFullName)

WshShell.Run ("msiexec.exe /passive /norestart /i" & dir & "\setup.msi")

'Блокировка клавы и мышки
AutoIt.BlockInput "on"
'Ожидание окна установки SCSI адаптера
AutoIt.WinWait "Мастер нового оборудования", "", 0
AutoIt.Sleep 500
AutoIt.Send "{ENTER}"
'Ожидание окна окончания установки SCSI адаптера
AutoIt.WinWait "Мастер нового оборудования", "Для закрытия мастера", 0
AutoIt.Sleep 600
AutoIt.Send "{ENTER}"
AutoIt.BlockInput "off"

WshShell.Run ("REGEDIT /S" & dir & "\sets.reg")

Wscript.Quit
В заключение хочу сказать что AutoIt это не только и не столько средство для автоматизации установки различных приложений, это скриптовый язык для автоматизации работы с приложениями, окнами, файлами и реестром с помощью него вполне реально создать небольшую програмку.

---------------------------------------------------------------------------------------------------

Разобранный здесь скрипт тестировался в vmware 4.5 на WinXP.rus SP2
Это сообщение посчитали полезным следующие участники:

Отправлено: 02:12, 21-03-2005

 

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

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


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

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


DenchikK
Цитата:
Примерно в половине программ она не срабатывает. Это нормально, или я что-то не так делаю?
Почти со стопроцентной уверенностью могу сказать, что все несрабатывающие используют установщик Inno Setup. Ничего не поделаешь - подводи куда нужно курсор и Send('{SPACE}')

Отправлено: 03:16, 08-08-2005 | #91



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.


Пользователь


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

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


DenchikK

Начну с самоцитаты из своего первого поста:
"Мне обидно за любимый AutoIt, когда его используют исключительно в этих [автокликанье] целях".

На другом ресурсе (где мы с тобой уже встречались) был предложен достаточно простой и быстрый(!) способ автоустановки WinAmp путем копирования свежеустновленной программы и ее данных в реестре.
Установка WinAmp (и большинства других программ) автокликаньем имеет огромный недостаток - зависит от версии программы. В результате с выходом каждой новой версии любимой программы, как правило, приходится переписывать autoit-скрипты , что со временем изрядно надоедает. Поэтому советую обращаться к AutoIt лишь тогда, когда другие средства установки неприменимы.
Способ установки копированием реестра также зависит от версии. Но все отличия, скорее всего, будут локализованы в одной-двух отвечающих за настройки программы ветках реестра, которые можно элементарно скопировать целиком и заменить в соответствующем reg-файле.
К тому же при этом способе часто удается использовать "скрытые" возможности самой программы. Например, простое копирование mplayerc.exe можно сопроводить RunWait(@ProgramFilesDir&'\Media Player Classic\mplayerc.exe /regvid') и зарегистристрировать таким образоом на Media Player Classic расширения видеофайлов. Остается добавить в реестр некоторые свои любимые настройки программы и - ву-аля.
Интересная комбинация может получаться при синтезе нескольких способов установки. Например, в папку $oem$\$Progs\WinRAR можно положить не развернутую копию программыных файлов, а только два из них - Settings.reg (сохраненные из самого WinRAR настройки) и rarreg.key (лицензионный ключ). Тогда для автоустановки WinRAR достаточно будет двух команд
RunWait ('regedit /s "@ProgramFilesDir@\WinRAR\Settings.reg"') и RunWait ('@ScriptDir@\wrar35b7ru.exe /S') (именно в этой последовательности!).

Относительно же твоих вопросов о том, почему в кокретном случае не срабатывает та или иная команды или не закрывается то или иное окно, на них ответить трудно. Для этого под рукой нужно иметь твою программу в той версии, которую ты мучаешь и т.д. Да и обсуждение, вряд ли для кого-нибудь, кроме тебя лично, будет представлять интерес. А раз так, тебе самому и решать возникающие проблемы - перебирай по очереди различные способы слежения за окнами в AutoIt (только параметром Opt('WinTitleMatchMode', 1-4) можно задать 4 таких способа), пробуй все известные способы нажимания на кнопки (различные Control, Send (особенно Send('горячая клавиша'), MouseClick), читай и перечитывай AutoIt.chm...

Sanja Alone
Цитата:
Почти со стопроцентной уверенностью могу сказать, что все несрабатывающие используют установщик Inno Setup.
А вот это уже значительно более интересный аспект темы, поднятой DenchikK.
В продолжение начатого с ним разговора могу напомнить, что у установщика INNO SETUP есть ключ /COMPONENTS="comma separated list of component names", так что можно вполне обойтись silent-установкой без чекбоксов.
При юзании устновщиков INNO SETUP можно также сохранить параметры ручной установки ключом /SAVEINF="filename", а потом воспроизводить их через /LOADINF="filename".

Отправлено: 22:19, 08-08-2005 | #92


Аватара для DenchikK

Старожил


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

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


bogomolv

Цитата:
Начну с самоцитаты из своего первого поста:
"Мне обидно за любимый AutoIt, когда его используют исключительно в этих [автокликанье] целях".
Может, вы и правы, но для меня пока нет задачи, кроме автокликанья, для которой мне мог бы понадобиться AutiIT. Появятся такие задачи – более полно раскроется для меня и AutoIT. Специально то я не буду искать такие задачи. Так что с этим всё очень просто.

Цитата:
На другом ресурсе (где мы с тобой уже встречались) был предложен достаточно простой и быстрый(!) способ автоустановки WinAmp путем копирования свежеустновленной программы и ее данных в реестре.
Знаю, но меня пока ни один из известных способов не устраивает, и этот метод меня не устраивает в первую очередь. Если посмотреть программой, отслеживающий изменения в системе, то можно увидеть, что изменений, относящихся к winamp насчитывается почти 2 тысячи! И каждый раз, как выходит новая версия опять заниматься отловом записей реестра, файлов и проч. (WinAmp ещё и кодаки ставит – и отдельно их отыскивать и регистрировать) – это полный геморрой. Хотя бы попробуйте экспортировать из реестра ключи, отвечающие за регистрацию расширений – обещаю – надоест очень быстро! Так что это способ отвергается сразу.

Цитата:
Поэтому советую обращаться к AutoIt лишь тогда, когда другие средства установки неприменимы.
Вот потому и пользуюсь AutoIT только в крайних случаях, мои приоритеты просты:
1. Ключи
2. Rar SFX
3. AutoIT

Цитата:
Да и обсуждение, вряд ли для кого-нибудь, кроме тебя лично, будет представлять интерес
C эти то же не согласен. Многим пользователям будет очень полезно
прочитать, как можно решить анологичную проблему. Программы меняются - а принцип решения может быть одинаковым.


Цитата:
пробуй все известные способы нажимания на кнопки (различные Control, Send (особенно Send('горячая клавиша'), MouseClick), читай и перечитывай AutoIt.chm...
Что я и делаю, прежде чем обратиться на форум.

Цитата:
В продолжение начатого с ним разговора могу напомнить, что у установщика INNO SETUP есть ключ
Далеко не все программы работают с этими 2 способами.

Последний раз редактировалось DenchikK, 09-08-2005 в 01:27.


Отправлено: 01:15, 09-08-2005 | #93


Аватара для Madcap

Новый участник


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

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


Цитата:
Многим пользователям будет очень полезно
прочитать, как можно решить анологичную проблему. Программы меняются - а принцип решения может быть одинаковым.
Полностью согласен. ИМХО после прочитывания данной темы у многих начинающих "писателей" скриптов отпадет большая часть вопросов.

Такой вопрос. Как можно кликнуть на скрытую кнопку?
Код: Выделить весь код
 
Control ID: 12325
ClassNameNN: Button7
Text:  Готово
(Control is hidden)
send ("{enter}") нехочется, потому что долго подводить курсор, а можно ли ControlClick-ом?

-------
Во имя ALTа, CTRLа и святого DELа.


Последний раз редактировалось Madcap, 09-08-2005 в 11:07.


Отправлено: 10:45, 09-08-2005 | #94


Пользователь


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

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


DenchikK
Во-первых, в интернете, как и в бане, все равны. Так что, не "выкай" (и тем более не делай это с маленькой буквы - я один!).
Во-вторых, ну и зачем ты это написал? Не хочешь слушать - не слушай. Я ж все равно не проверю, как ты реализушь мои бесценные наставления! А по содержанию твой пост - сугубо личное послание-оправдание. Для этого есть почтовый ящик.


DenchikK & Madcap

Цитата:
Многим пользователям будет очень полезно прочитать, как можно решить анологичную проблему. Программы меняются - а принцип решения может быть одинаковым.
Полностью согласен. ИМХО после прочитывания данной темы у многих начинающих "писателей" скриптов отпадет большая часть вопросов.
И я полностью согласен, что нужно обсуждать ПРИНЦИПЫ. Поэтому и пишу.
Вы же обсуждаете, "можно ли кликнуть на скрытую кнопку" или "как бы сделать обход этого - например оператором IF". Кто ж за вас это сделает? Вот и попробуйте кликнуть на скрытую кнопку или сделать обход оператором IF. А результаты доложите...

Отправлено: 14:13, 09-08-2005 | #95


Старожил


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

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


Всем привет.
Аналогичная проблемка. Иногда выскакивает окошко, иногда нет. В случае, когда оно есть - скрипт удачно доходит до конца. В случае, когда окошка нет - не происходит отработки ветки "Else". Что не так?

Код: Выделить весь код
Run("ezAntivirus.exe")
 
;BlockInput(1)
 
WinWaitActive("License Agreement", "")
ControlClick("License Agreement", "", "CUST:BUTTON2")
 
WinWaitActive("Installation Location", "")
ControlClick("Installation Location", "", "CUST:BUTTON2")
 
If WinExists ("Update Message", "") Then
WinWaitActive ("Update Message", "")
ControlClick("Update Message", "", "CUST:BUTTON2")
 
WinWaitActive ("Scan", "")
ControlClick("Scan", "", "CUST:BUTTON1")
ControlClick("Scan", "", "CUST:BUTTON1")
 
WinWaitActive("Restart Required", "")
WinClose("Restart Required", "")
 
Else
 
WinWaitActive ("Scan", "")
ControlClick("Scan", "", "CUST:BUTTON1")
ControlClick("Scan", "", "CUST:BUTTON1")
 
WinWaitActive("Restart Required", "")
WinClose("Restart Required", "")
 
EndIf
 
Exit

Отправлено: 12:42, 13-08-2005 | #96


Старожил


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

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


Цитата:
Ничего не поделаешь - подводи куда нужно курсор и Send('{SPACE}')

Воспользовался этим нехитрым методом:

Код: Выделить весь код
...
WinWaitActive("Drive Image 2002 Setup", "Select the features you want to install")
ControlFocus ( "Drive Image 2002 Setup", "", "SysTreeView321") 
MouseClick( "left", 443, 471, 1)
ControlFocus ( "Drive Image 2002 Setup", "", "Button2")
Send("!n")
...
Работает! Но... только на моём компе, когда тестирую скрипт.
При запуске на виртуальной машине или другом компьютере стрелка уезжает совсем не в то место, где нужно кликнуть

Отправлено: 13:05, 13-08-2005 | #97


Пользователь


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

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


biork

По MouseClick.
Вместо этой команды Tab'ом подведи к кусор к кнопке и кликни ее. Что-то вроде Send({Tab}{Enter}).

По неожиданным окошкам.
Не знаю конкретной проблемы, но в общем случае для неожиданных окон и любых других нежелательных оказий в AutiIt есть чудная процедура AdlibEnable('Имя функции').
Пример. На стадии cmdlines иногда выскакивает сообщение о заканчивающейся виртуальной памяти. Для его погашения в cmdlines.au3, отрабатывающем все действия на данной стадии, задаем функцию NonVMEM
Код: Выделить весь код
AdlibEnable('NonVMEM')
...
обычные действия
...
Exit
 
Func NonVMEM()
If WinExists('Слишком мало виртуальной памяти') Then WinKill('Слишком мало виртуальной памяти')
EndFunc

Последний раз редактировалось bogomolv, 14-08-2005 в 02:12.


Отправлено: 01:56, 14-08-2005 | #98


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

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


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

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


biork
Если сильно хочется MouseClick-нуть, то сначала обрати внимание на опцию
Код: Выделить весь код
Opt("MouseCoordMode", 1)        ;1=absolute, 0=relative, 2=client
По умолчанию, привязка идет к левому верхнему углу экрана (1), а тебе нужно привязаться к активному окну (0) или к клиентской части активного окна (2). В AutoIt Window Info эти режимы находятся здесь: Options - Coord Mode.

Отправлено: 03:01, 14-08-2005 | #99


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

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


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

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


Я написал простенький конвертер для перевода reg-файлов в директивы AutoIt (RegWrite и RegDelete).
Конвертер понимает все типы параметров (известные AutoIt-у), поддерживает удаление веток/параметров.
Параметры типов REG_RESOURCE_LIST (hex(8)), REG_FULL_RESOURCE_DESCRIPTOR (hex(9)), REG_RESOURCE_REQUIREMENTS_LIST (hex(a)), REG_QWORD (hex(b)), а также неправильные параметры типа DWORD (hex(4)) пропускаются.

Ограничения: не понимает Unicode, т.е. исходные reg-файлы должны быть в DOS или Win кодировках (REGEDIT4).
Особенности: медленная работа с большими файлами (675Кб ветка HKLM\SYSTEM\CurrentControlSet\Services, выбранная для теста, обрабатывается 4,5 мин. на AXP-1500MHz). Я не считаю этот момент проблемой, т.к. конвертер предназначен не для преобразования реестра, а для дополнения AutoIt-скриптов установок прог их настройками из reg-файлов.

Кому нужен - прошу
Если при использовании столкнетесь с какими-то недоработками - мыльните.

Кроме того, скрипты установки н-рых программ находятся на этой странице.

P.S. Исправил проблемы с \\, \", одинарными кавычками внутри параметров ('), двоеточиями в названиях параметров, параметрами по умолчанию (@), символами равно внутри строковых параметров.

Последний раз редактировалось Sanja Alone, 25-10-2005 в 05:32.


Отправлено: 02:24, 15-08-2005 | #100



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » [Архив - Часть 1.1] AutoIt скрипты

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
Открывая 7z архив пишет не удаётся открыть как архив. Можно ли его восстановить? DreDo Хочу все знать 4 01-12-2009 18:54
[Архив - Часть 3] AutoIt скрипты .:[общие вопросы]:. Vadikan AutoIt 1543 18-01-2009 10:46
[архив - Часть 2] AutoIt скрипты Vadikan AutoIt 985 21-01-2008 09:58
[Архив - Часть 1.3] AutoIt скрипты biork AutoIt 503 09-06-2007 11:27
[Архив - Часть 1.2] AutoIt скрипты Dirk Diggler AutoIt 505 02-12-2006 11:00




 
Переход