Всем доброго времени суток!
DanilTV@twitter, я в своем предыдущем посте от 29-05-2012 был несколько категоричен в своем высказывании и хотел бы исправиться
![Smile](images/smilies/new/smile.gif)
.
Как писал
dimagromyko в данном случае надо будет работь с таблицами
CustomAction и
InstallExecuteSequence.
Ниже пример создания экшена:
таблица
CustomAction :
в поле
Action именуем "экшен"
в поле
Type будет сумма флагов определющая тип нашего экшена. В примере будет 102, т.к мы будем запускать vbs скрипт, для вывода сообщения пользователю прямо из MSI, сам скрипт будет хранится в текстовом виде в поле
Target. Также инсталятор будет ожидать окончания выполнения скрипта.
в поле
Source все оставляем без изменений - с параметром <null>
в поле
Target копируем текст скрипта (при помощи Import Text File из контекстного меню в Orca или Multi-Line Editor в InstEd <-
Shift+Entr)
Код:
![Выделить весь код](images/misc/selectcode.png)
Dim Msg, Style, Title, Response, MyString
Msg = "Please. Close your web-browser!"
Style = vbOKOnly + vbExclamation + vbDefaultButton1
Title = "System message"
Response = MsgBox(Msg, Style, Title)
таблица
InstallExecuteSequence:
в поле
Action линк на наш экшен таблице
CustomAction
в поле
Condition условие
NOT Installed, кастом екшен будет запускаться толко при инсталяции
в поле
Sequence порядок выполнение экшена в процессе инсталяции, быбираем любое свободное значение в диапазоне между InstallInitialize и InstallFinalize. Т.к нам надо вывести сообщение, как можно раньше, то тулим наш экшен как можно ближе к InstallInitialize.
Все!