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

Компьютерный форум 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 | Цитировать


bogomolv
Цитата:
НЕ МОГУ ввести латинскую "D"!
Chr(68) пробовал?

Цитата:
Хотел бы подмазаться.
А какие проблемы, я же недавно предлагал всем желающим присоединяться. Если есть что-то, чего не жалко раздать всем и нашару - прошу. Авторства я себе присваивать не собираюсь, честность - мой порок

Цитата:
Но, блин, как же это тяжело думать о других...
Альтруизм - врожденная неизлечимая болезнь. Если с этим родился, с этим и помрешь. Я даже в игрушках всегда играю за хороших...

Цитата:
Но как же мы по-разному думаем!
Ес-но, одинаково мыслящие люди - это уже роботы На нашей Окраине политики любят называть таких биомассой. Ужасное, но предельно точное определение из уст мерзких лицемерных существ...
Цитата:
Вместо autoit-foxitpdf.au3 у меня в ...
У меня программы ставятся с отдельного DVD (на основе WPI), к тому же я не люблю установку прог через $oem$ - тогда уж лучше юзать sfx-архивы. Возьмем, например мой любимый Far - я никогда не буду его ставить скриптом, а только через sfx. Да и скрипты я стараюсь делать с расчетом на простых юзеров.

-------
Sanja Alone's site (ConvRegToAU3, OEsr, RSA, AutoIt скрипты)


Последний раз редактировалось Sanja Alone, 19-09-2005 в 03:47.


Отправлено: 02:54, 19-09-2005 | #141



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

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


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


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

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


EgOrus
Спасибо твик помог, все получилось

Отправлено: 09:21, 19-09-2005 | #142


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


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

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


Sanja Alone
Цитата:
Chr(68) пробовал?
Обижаешь, начальник!

Отправлено: 22:33, 19-09-2005 | #143


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


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

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


Sanja Alone
Цитата:
к тому же я не люблю установку прог через $oem$
"Какие Ваши доказательства?" (с) Красная жара

Последний раз редактировалось bogomolv, 20-09-2005 в 10:27.


Отправлено: 22:38, 19-09-2005 | #144


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

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


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

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


bogomolv
Цитата:
"Какие Ваши доказательства?" (с) Красная жара
Жаль, что ты не можешь передать акцент, с к-рым была произнесена эта фраза А "доказательства" мои простые: опять же приведу в кач-ве примера Far. Что мы имеем: более тысячи файлов общим объемом в 16 с лишним мегабайт. Через $oem$ с CD/DVD это дело будет очень долго копироваться, постоянно дергая диск по причине большого к-ва мелких файлов, а из sfx-а ставится за несколько секунд. Хотя, метод $oem$ вполне приемлем для установки программ с малым к-вом файлов, таких, как упомянутый выше FoxitPDFReader. И ес-но, $oem$-метод лишен смысла при установке приложений НЕ с диска с Виндой - мой случай.
Цитата:
В огороде бузина, а в Киеве Sanja Alone?
Я продолжу: За те я тебе полюбив, що на руцi перстень маеш... Эта поговорка употребляется с целью показать человеку, что он говорит о несвязанных между собой вещах, порет чушь. Я же говорил о предпочитаемом мной способе установки, так же, как ты о способе $oem$. Ты бы лучше что-то по сути твоей нелюбви к sfx сказал, а не пытался меня обидеть.

P.S. На будущее: если хочется сказать мне какую-то гадость, то для этого есть e-mail. Иначе можно форум превратить в подобие одной известной fido-конференции, в к-рой от банальных перепалок перешли к межнациональным словесным войнам. Какое-то время это даже было забавно читать, потом стало скучно, а в рез-те эху снесли с бона...

-------
Sanja Alone's site (ConvRegToAU3, OEsr, RSA, AutoIt скрипты)


Отправлено: 02:25, 20-09-2005 | #145


Старожил


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

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


bogomolv
Цитата:
Вместо autoit-foxitpdf.au3 у меня в ...\$oem$\$Progs\FoxitReader лежат FoxitReader.exe и foxitpdfreader.reg
Хорошая программа да еще и установки не требует. А как ассоциировать файлы с расширением pdf с этой программой?

Отправлено: 07:38, 20-09-2005 | #146


Ветеран


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

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


VelDmi
добавь в свой foxitpdfreader.reg (не забудь поменять пути если у тебя другий):
Код: Выделить весь код
; Foxit PDF Reader
[HKEY_CLASSES_ROOT\.pdf]
@="FoxitReader.Document"
"Content Type"="application/pdf"

[HKEY_CLASSES_ROOT\FoxitReader.Document]
@="PDF Document"
"BrowseInPlace"="1"

[HKEY_CLASSES_ROOT\FoxitReader.Document\DefaultIcon]
@="C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE,1"

[HKEY_CLASSES_ROOT\FoxitReader.Document\DocObject]
@="0"

[HKEY_CLASSES_ROOT\FoxitReader.Document\protocol\StdFileEditing\server]
@="C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE"

[HKEY_CLASSES_ROOT\FoxitReader.Document\protocol\StdFileEditing\verb\0]
@="&Edit"

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\open\command]
@="\"C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE\" \"%1\""

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\print\command]
@="C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE /dde"

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\print\ddeexec]
@="[print(\"%1\")]"

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\printto\command]
@="C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE /dde"

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\printto\ddeexec]
@="[printto(\"%1\",\"%2\",\"%3\",\"%4\")]"
или сокращенный вариант
Код: Выделить весь код
; Foxit PDF Reader
[HKEY_CLASSES_ROOT\.pdf]
@="FoxitReader.Document"
"Content Type"="application/pdf"

[HKEY_CLASSES_ROOT\FoxitReader.Document]
@="PDF Document"
"BrowseInPlace"="1"

[HKEY_CLASSES_ROOT\FoxitReader.Document\DefaultIcon]
@="C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE,1"

[HKEY_CLASSES_ROOT\FoxitReader.Document\DocObject]
@="0"

[HKEY_CLASSES_ROOT\FoxitReader.Document\shell\open\command]
@="\"C:\\PROGRA~1\\PDFREA~1\\FOXITR~1.EXE\" \"%1\""
bogomolv
Sanja Alone
стоит ли из-за таких пустяков ссориться, у каждого свои любимые методы и вкусы, а о вкусах как известно не спорят

Отправлено: 09:58, 20-09-2005 | #147


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


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

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


Sanja Alone
Цитата:
метод $oem$ вполне приемлем для установки программ с малым к-вом файлов
Золотые слова. Именно поэтому через \$oem$\$Progs у меня устанавливаются только 5 из 30 "автоустанавливаемых" программ. Установка остальных программ идет, как правило, через SFX-архив, содержащий дистрибутив программы, файлы ее настроек и скрипты автоустановки...
О чем спорим?

EgOrus
Считаю полезным также прописывать регистрацию pdf-файла на FineReader:
Код: Выделить весь код
;Открыть с помощью FineReader
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\FoxitReader.Document\shell\Open With FineReader]
@="Открыть с помощью FineReader"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\FoxitReader.Document\shell\Open With FineReader\Command]
@="\"C:\\Program Files\\ABBYY FineReader 7.0 Professional Edition\\FineReader.exe\" \"%1\""
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\FoxitReader.Document\shell\Open With FineReader\ddeexec]
@="Open(\"%1\")"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\FoxitReader.Document\shell\Open With FineReader\ddeexec\Application]
@="FineReader"
[HKEY_LOCAL_MACHINE\SOFTWARE\Classes\FoxitReader.Document\shell\Open With FineReader\ddeexec\Topic]
@="System"

Отправлено: 10:44, 20-09-2005 | #148


Ветеран


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

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


bogomolv
не... это не мне это для VelDmi, наверное будет полезно я пользуюсь сокращенным вариантом и то лишь при создании WinPE
кстати сообщения лучше редактировать, если чего-то забыл дописать, чем плодить неск. подряд

Отправлено: 11:00, 20-09-2005 | #149


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


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

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


Изображения
Тип файла: jpg NewDisk.jpg
(15.3 Kb, 63 просмотров)
Тип файла: jpg Unattend.jpg
(18.9 Kb, 44 просмотров)
Тип файла: jpg OEMDrivers.jpg
(9.4 Kb, 37 просмотров)

Автоматизация подготовки диска к установке системы.
Два скрипта NewDisk.au3 и Unattend.au3:
http://forum.oszone.net/attachment.p...ntid=997&stc=1
http://forum.oszone.net/attachment.p...ntid=998&stc=1
http://forum.oszone.net/attachment.p...ntid=999&stc=1
Блин, как сделать, чтобы были рисунки?
С их помощью процесс развертывания системы на новом компьютере (друзья, дети, дети друзей и друзья детей) сводится к загрузке с CD Windows PE и исполнению этих самых скриптов.

Первым скриптом готовится диск: разбиение диска, его форматирование, развертывание WinPE, создание типовых папок, сбрасывание дистрибутива WinXP.
Привязка дистрибутива к машине и пользователю осуществляется вторым скриптом. Им правится unattend.txt: пользователь, настройки экрана, oem-драйвера и т.п. Самое муторное в этой процедуре - правка OemPnPDriversPath. Чтобы максимально облегчить редактирование этого параметра, включил в скрипт дополнительные средства обработки папки $oem$\$1\drivers.
Единственное, что приходится делать ручками (вернее, головой), отбирать для дистрибутива заготовки драйверов (включающие при необходимости скрипты автоустановки и подстройки последних). Как уже писал, для этого имею базу таких заготовок, которую по мере обновления драйверов и знакомства с новым железом периодически пополняю.
После такой подготовки, занимающей в несложном случае полчаса, остается запустить автоустановку WinXP. Проследив результат и подкорректировав исходники, вручаю "клиенту" работающую машину с "ноутбучным" комплектом ПО для автопереустановки системы, о котором рассказывал раньше.

Конечно, установка типовой системы с CD проще и быстрее. Для подобных целей имею собственный "супер-диск" с набором основных драйверов и типовых программ. Но чтобы донастроить установленную таким образом систему требуется квалификация. Вариант с дистрибутивом, полностью привязанным к машине, позволяет самому неподготовленному пользователю самостоятельно поддерживать работоспособность системы самым эффективным способом - периодически вчистую ее переустанавливая.

В продолжение разговора об интересных функциях.
При отладке работы NewDisk.au3 столкнулся с необходимостью считывать результаты командной строки непосредственно в память: WinPE работает с CD, жесткий диск еще не размечен, создавать виртуальный диск, чтобы выполнить DiskPart.exe /S list.txt > 1.txt, не хотелось. Нашел красивую замену в лице CLIPCOPY.EXE (21Kb), считывающей выходные данные командной строки в clipboard. С помощью этой программульки считываю информацию о присутствующих в системе дисках следующим образом:
Код: Выделить весь код
RunWait('%Comspec% /C DiskPart.exe /S $iDir$\dpartLIST$i$.txt | CLIPCOPY','',0)
$dsk=StringSplit(ClipGet(),@CRLF)
Еще одна находка.
Раньше для развертывания WinPE на жестком диске (использую WinPE, в том числе, и при переустановке системы для автоудаления "замусоренных" системных папок) запускал установку Консоли восстановления, которая нужна была только для получения файловой копии загрузочного сектора BOOTSECT.DAT. Добрые люди подсказали, что в BartPE есть плагин, делающий это проще, быстрее и гибче. Позаимствовал оттуда MKBT.EXE (26Kb) и NT2PELDR.EXE (16Kb). Теперь создание загрузчика WinPE выглядит так:
Код: Выделить весь код
RunWait('@ScriptDir@\mkbt.exe -x -c $ds$ $ds$\Peldr.dat')
RunWait('@ScriptDir@\nt2peldr.exe $ds$\Peldr.dat')
IniWrite('$ds$\Boot.ini','operating systems','C:\Peldr.dat','"Microsoft Windows PE" /MiniNT')
Последние находки позволили оптимизировать NewDisk.au3 так, что теперь можно подготовить чужой диск, просто подключив его к своей машине.

Отправлено: 23:20, 20-09-2005 | #150



Компьютерный форум 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




 
Переход