[garbals]

покажи свой скрипт посмотрю потестирую

[Dust112]

Код:

;AutoItSetOption("TrayIconHide", 1);Скрыть значок в трее
Run("MInstall.exe","");Запустить файл 
;Ввод Артикульного номера
WinWait("Добро пожаловать","")
WinWaitActive("Добро пожаловать")
ControlSetText ("Добро пожаловать", "", "Edit1", "Н О М Е Р")
Sleep(500)
ControlClick ("Добро пожаловать", "", "Button1")

WinWait("PROMT Professional 7 Giant - InstallShield Wizard")
WinWaitActive("PROMT Professional 7 Giant - InstallShield Wizard")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "", "Button1")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Лицензионный договор")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Лицензионный договор")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Лицензионный договор", "Button3")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Лицензионный договор", "Button5")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Сведения о пользователе")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Сведения о пользователе")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Сведения о пользователе", "Button5")

; Для ввода Лицензионного номера и выборочной установки, для себя, я правил файл PROMT Professional 7 Giant.msi.
; Поэтому здесь выбрана полная установка.
 
WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Лицензионный номер")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Лицензионный номер")
ControlSetText ("PROMT Professional 7 Giant - InstallShield Wizard", "Лицензионный номер:", "Edit1", "Н О М Е Р")
ControlSetText ("PROMT Professional 7 Giant - InstallShield Wizard", "Лицензионный номер:", "Edit2", "Н О М Е Р")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Лицензионный номер", "Button2")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Папка назначения")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Папка назначения")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Папка назначения", "Button1")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Вид установки")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Вид установки")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Выберите вид установки.", "Button5")

;WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Выборочная установка")
;WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Выборочная установка")
;ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Выборочная установка", "Button5")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Готова к установке программы")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Готова к установке программы")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard", "Готова к установке программы", "Button1")

WinWait ("PROMT Professional 7 Giant - InstallShield Wizard","Программа InstallShield Wizard завершена")
WinActivate ("PROMT Professional 7 Giant - InstallShield Wizard","Программа InstallShield Wizard завершена")
ControlClick ("PROMT Professional 7 Giant - InstallShield Wizard","Программа InstallShield Wizard завершена", "Button1")
;Панель
WinWait ("SmarTool")
WinActivate ("SmarTool")
ControlClick ("SmarTool", "", "Button1")
ControlClick ("SmarTool", "", "Button6")

[ANGRO]

Господа посмотрите листинг, после Sleep 5000 не работает, а если вынести этот кусок кода в отдельный фаил всё ок.Сильно ногами не бейте написал за два часа после скачки AutoIt, вобщем чайник

Код:

Run("MInstall.exe")
WinActivate("Добро пожаловать")
WinWaitActive("Добро пожаловать")
Send("xxxxxxxx")
ControlClick("Добро пожаловать","Введите артикульный номер продукта:","Button1")
WinWaitActive("PROMT XT Office readme.txt - Блокнот")
WinClose("PROMT XT Office readme.txt - Блокнот")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
;Sleep("500")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Вас приветствует программа InstallShield Wizard для PROMT XT Office Giant","Button1")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Пожалуйста, внимательно и полностью прочтите следующий Лицензионный договор. Дальнейшая установка возможна только после принятия условий Лицензионного договора.","Button3")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Пожалуйста, внимательно и полностью прочтите следующий Лицензионный договор. Дальнейшая установка возможна только после принятия условий Лицензионного договора.","Button5")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","&Пользователь:","Button5")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
Send("xxxxxxxxxxxxxxx")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Лицензионный номер:","Button2")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Установка PROMT XT Office Giant в:","Button1")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Выберите вид установки.","Button2")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Выберите вид установки.","Button5")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","&Установить","Button1")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","&Установить","Button6")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","&Установить","Button1")
Sleep("5000")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Promt Backup","Button6")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Promt Backup","Button1")
WinActivate("PROMT XT Office Giant - InstallShield Wizard")
WinWaitActive("PROMT XT Office Giant - InstallShield Wizard")
ControlClick("PROMT XT Office Giant - InstallShield Wizard","Программа InstallShield Wizard завершена","Button1")
WinActivate("SmarTool")
WinWaitActive("SmarTool")
ControlClick("SmarTool","Встраивать функции перевода в:","Button6")

[Denion]

Всем добрый день или ночь. У меня есть Promt 7. Хочу сделать админ. точку для него. Но ничего не выходит. Может кто то занет с каким параметром запускаеться "Setup.exe" через MInstall.exe. Или может кто-то занет как сделать эту админ точку.

[Strategos]

Поддерживаю!
Подскажите как в дистр интегрировать серийники и словари ну и с каким ключём создать SFX архив?

[Debugger]

Denion

В дистрибутиве программы Boa Soft Installer (соотв. тема в форуме) есть утилита для определения параметров командной строки ShowCmdParam.exe. Переименуй ее в setup.exe и запусти MInstall.exe. В появившемся окне увидишь ключи. Я бы их и так сказал, просто сейчас на работе.
Чт окасается админточки, то у многих дистрибутивов админточка - это прерогатива Enterprise- или корпоративной версии. Следовательно из обычного дистра просто так сделать админточку не получится, если вообще получится. У меня не получилось.

[ZaV]

попробовал при помощи ShowCmdParam получить ключ запуска для promt xt все получилось

Код:

msiexec.exe /i promt_xt.msi KBRIYPGWNEULCSJAQHXOFVM=xxxxxxxx /qb

где xxxxxxxx - артикульный номер причем серийник даже и не понадобился ... не прописывал его ни в msi ни в ком строке

для promt 7 giant проделал туже операцию с ShowCmdParam.exe
получил следующую строку

Код:

msiexec.exe /i promt7.msi KBRIYPGWNEULCSJAQHXOFVM=xxxxxxxx

причем если указать pidkey в ком строке дальше или прописать его в msi то он подхватывается ... и установка идет если нажимать кнопки руками ...
но как только добавляется к командной строке ключ /qb то сразу ругается на неверный серийник ...
может кто знает в чем дело

[ZaV]

кажись сам нашел ...
у них в msi PIDtemplate был такой <??????????-??????>

в orce исправил на <??????????-????> (убрал 2 символа в конце и все прокатило а то уж собирался автоит делать)

строка получилась такая msiexec.exe /i "PROMT Expert 7 Giant.msi"KBRIYPGWNEULCSJAQHXOFVM=aaaaaaaa pidkey=xxxxxxxxxx-xxxx /qb

где aaaaaaaa - артикульный номер
xxxxxxxxxx-xxxx - серийный номер

[Debugger]

ZaV
А с админточкой не пробовал разбираться?

В моем дистрибутиве есть большой (около 200 метров) файл с расширением .Z, который не хочет распаковываться. Если взвесить папку с уже установленной программой, то по размеру видно, что файл этот участия в установке не принимал. Если его удалить, то установка тоже проходит нормально. Кто-нибудь знает, для чего он, и вообще есть ли он у кого, а то я уже подумываю, не попал ли он туда случайно.

[ZaV]

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