|
Компьютерный форум OSzone.net » Автоматическая установка Windows » Автоматическая установка приложений » Создание файла ответов MST к новым инсталляторам Windows Installer. |
|
|
Создание файла ответов MST к новым инсталляторам Windows Installer.
|
Ветеран Сообщения: 2154 |
Профиль | Отправить PM | Цитировать
Здравствуйте.
Есть задача создать файлы ответов к нескольким программам запакованным MSI. Сразу оговорюсь, что о Microsoft Office 2003 Resource Kit знаю, пользуюсь, но он подходит только для старых msi инсталляторов (см. вложение). Для примера: Opera`ы выше 11.01 он не пойдёт, файл ответов создастся, а вот инсталлятор его не примет. Есть и другие программы которым тоже не пойдёт старый MS Office 2003 Resource Kit и созданные на его основе MST. Вопрос состоит вот в чём, что есть на подобное Microsoft Office 2003 Resource Kit (такой же простое и незамысловатое) для создания файлов ответов в формате mst? Перепаковывать MSI не хочу (не вижу смысла), нужно только создание файла ответов. Буду благодарен всем за дельный совет или направление поиска. |
|
------- Отправлено: 12:29, 23-05-2012 |
Ветеран Сообщения: 4677
|
Профиль | Отправить PM | Цитировать Цитата Anton04:
|
|
------- Отправлено: 20:06, 24-05-2012 | #21 |
Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети. Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля. |
Ветеран Сообщения: 2154
|
Профиль | Отправить PM | Цитировать cameron,
К сожалению, но не подошёл "this package does not support hiding dialogs" и даже если продолжить все диалоги в каких-то английских названиях строк (типа PLACEHOLDER_-2066447959). |
------- Отправлено: 10:03, 25-05-2012 | #22 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Цитата Anton04:
|
|
Отправлено: 10:26, 25-05-2012 | #23 |
Ветеран Сообщения: 2154
|
Профиль | Отправить PM | Цитировать Iska,
Вполне возможно, только всё ровно это не то... |
------- Отправлено: 10:42, 25-05-2012 | #24 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать |
Отправлено: 11:24, 25-05-2012 | #25 |
Ветеран Сообщения: 2154
|
Профиль | Отправить PM | Цитировать Iska,
Понятно, ищем дальше... может и повезёт... |
------- Отправлено: 11:55, 25-05-2012 | #26 |
Новый участник Сообщения: 20
|
Профиль | Отправить PM | Цитировать Цитата Iska:
|
|
Отправлено: 13:40, 25-05-2012 | #27 |
Ветеран Сообщения: 2154
|
Профиль | Отправить PM | Цитировать Цитата AlexKr:
|
|
------- Отправлено: 13:59, 25-05-2012 | #28 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Цитата AlexKr:
Цитата:
|
||
Отправлено: 16:22, 25-05-2012 | #29 |
Ветеран Сообщения: 27449
|
Профиль | Отправить PM | Цитировать Anton04, а так ли уж Вам нужен универсальный редактор? Может быть, сгодится и прямой способ, наподобие:
Option Explicit Const msiOpenDatabaseModeReadOnly = 0 Const msiOpenDatabaseModeTransact = 1 Dim strPath2OriginalMSI Dim strPath2WorkingMSI Dim strPath2MST Dim objFSO Dim objWindowsInstaller Dim strQuery strPath2OriginalMSI = "C:\Песочница\0008\Opera_1164_1403_in.msi" strPath2WorkingMSI = GetTemporaryName() Set objFSO = WScript.CreateObject("Scripting.FileSystemObject") With objFSO strPath2MST = .BuildPath(.GetParentFolderName(strPath2OriginalMSI), .GetBaseName(strPath2OriginalMSI) & ".mst") .CopyFile strPath2OriginalMSI, strPath2WorkingMSI End With Set objWindowsInstaller = WScript.CreateObject("WindowsInstaller.Installer") ' Меняем путь установки приложения по умолчанию: strQuery = "UPDATE `Directory` SET `DefaultDir`='MyOperaPath' WHERE `Directory` = 'OPERA' AND `Directory_Parent` = 'ProgramFilesFolder'" With objWindowsInstaller.OpenDatabase(strPath2WorkingMSI, msiOpenDatabaseModeTransact) With .OpenView(strQuery) .Execute .Close End With .Commit If .GenerateTransform( _ objWindowsInstaller.OpenDatabase(strPath2OriginalMSI, msiOpenDatabaseModeReadOnly), _ strPath2MST _ ) Then WScript.Echo "Create [" & strPath2MST & "]." Else WScript.Echo "Can't create [" & strPath2MST & "]." End If End With Set objWindowsInstaller = Nothing objFSO.DeleteFile strPath2WorkingMSI, True Set objFSO = Nothing WScript.Quit 0 '============================================================================= '============================================================================= ' Серый форум / vbscript: генерация пути для временного файла или папки ' (http://forum.script-coding.com/viewtopic.php?id=1221) '============================================================================= Function GetTemporaryName() Const TemporaryFolder = 2 Dim strTempName With WScript.CreateObject("Scripting.FileSystemObject") Do strTempName = .BuildPath(.GetSpecialFolder(TemporaryFolder), .GetTempName) Loop While .FileExists(strTempName) Or .FolderExists(strTempName) End With GetTemporaryName = strTempName End Function '============================================================================= |
Отправлено: 19:15, 25-05-2012 | #30 |
|
Участник сейчас на форуме | Участник вне форума | Автор темы | Сообщение прикреплено |
| |||||
Название темы | Автор | Информация о форуме | Ответов | Последнее сообщение | |
[решено] Выбор файла ответов при установке Windows | Omnividente | Автоматическая установка Windows 2000/XP/2003 | 2 | 28-07-2010 18:53 | |
[решено] При наличии файла ответов нет функции Восстановления (Repair, [R]) | toai | Автоматическая установка Windows 2000/XP/2003 | 33 | 27-03-2009 11:20 | |
[решено] Два файла ответов и графическое меню | XDeveloper | Автоматическая установка Windows 2000/XP/2003 | 1 | 26-06-2008 13:47 | |
Нужна помощь по настройкам файла ответов и его срабатыванию при установке | Wu-Tang | Хочу все знать | 97 | 28-05-2008 18:53 | |
Vista unattend установка - вопрос о параметрах файла ответов | bekas | Автоматическая установка Windows 11 / 10 / 8 / 7 / Vista | 5 | 20-12-2006 11:43 |
|