Поделиться через


Создание преобразования настройки

Файл преобразования можно создать с помощью MsiDatabaseGenerateTransform или метода GenerateTransformобъекта Database. Пример этого приведен в пакете SDK установщика Windows в качестве служебной WiGenXfm.vbs. Следующий фрагмент кода, Gen.vbs, также иллюстрирует метод GenerateTransform и предназначен для использования с узлом сценариев Windows.

'Gen.vbs. Argument(0) is the original database. Argument(1) is the
'    customized database. Argument(2) is the transform file.
 
Option Explicit

' Check arguments
If WScript.Arguments.Count < 2 Then
    WScript.Echo "Usage is gen.vbs [original database] [customized database] [transform file]"
    WScript.Quit(1)
End If

' Connect to Windows Installer object
On Error Resume Next
Dim installer : Set installer = Nothing
Set installer = Wscript.CreateObject("WindowsInstaller.Installer") 
' Open databases
Dim database1 : Set database1 = 
    installer.OpenDatabase(Wscript.Arguments(0), 0) 
Dim database2 : Set database2 = 
    installer.OpenDatabase(Wscript.Arguments(1), 0) 
' Generate transform
Dim transform : transform = Database2.GenerateTransform(Database1,
    Wscript.Arguments(2))

Чтобы создать файл преобразования MNPtrans.mst из исходной базы данных MNP2000.msi и базы данных MNP2000t.msi, измененной в разделе Настройка исходной базы данных, измените каталоги на папку, содержащую Gen.vbs, исходную базу данных и обновленную базу данных установщика, и введите следующую командную строку.

Cscript.exe Gen.vbs MNP2000.msi MNP2000t.msi MNPtrans.mst

Продолжить