Làm cách nào để thêm/cập nhật thuộc tính bên trong MSI từ dòng lệnh?

Question

Tôi có trình cài đặt MSI mà tôi cần thêm hoặc sửa đổi thuộc tính văn bản ngắn từ dòng lệnh.

Việc này phải được thực hiện sau khi trình cài đặt được tạo; Tôi không thể sửa đổi quy trình tạo trình cài đặt ở vị trí đầu tiên. Nó cũng phải được thực hiện không đầu từ một kịch bản.

Khi tôi nói "thuộc tính", nó có thể là thuộc tính MSI, giá trị được ghi vào sổ đăng ký tại thời điểm cài đặt hoặc bất kỳ cơ chế nào khác có thể đưa văn bản tùy chỉnh ngắn này vào ứng dụng đã cài đặt khi ứng dụng chạy.

Answer 1

Ví dụ VBScript mà bạn có thể sử dụng để cập nhật (hoặc thêm) một hậu bất động sản xây dựng ...

Option Explicit 

Const MSI_FILE = "myfile.msi" 


Dim installer, database, view 

Set installer = CreateObject("WindowsInstaller.Installer") 
Set database = installer.OpenDatabase (MSI_FILE, 1) 

' Update 
Set view = database.OpenView ("UPDATE Property SET Value = '" & myproperty & "' WHERE Property = 'MYPROPERTY'") 

' .. or Add (Insert) 
Set view = database.OpenView ("INSERT INTO Property (Property, Value) VALUES ('MYPROPERTY', '" & myproperty & "')") 
view.Execute 


Set database = Nothing 
Set installer = Nothing 
Set view = Nothing 

để biết thêm thông tin xem phần Windows Installer SDK (một phần của Windows SDK), có một loạt các ví dụ kịch bản mà bạn có thể sử dụng từ dòng lệnh để làm nhiệm vụ thao tác khác nhau MSI, ví dụ WiRunSQL.vbs cho phép bạn thực thi SQL tùy ý đối với MSI.

Answer 2

c:\> msiexec /i yourmsi.msi THEPROPERTYNAME=valueofproperty 

Để biết thêm thông tin, hãy nhập msiexec tại dòng lệnh.

EDIT: hoặc thay đổi các tập tin .msi bản thân bằng cách sử dụng câu lệnh SQL và cập nhật các tài sản trong các thuộc tính bảng: http://msdn.microsoft.com/en-us/library/aa372021(VS.85).aspx http://msdn.microsoft.com/en-us/library/aa368568(VS.85).aspx

Answer 3

Điều này là để thêm vào câu trả lời của @saschabeaumont trong '09. Hiện đang sử dụng dotNet 4.0

Option Explicit 

Const MSI_FILE = "myFilePath.msi" 
Const PROPERTY_STRING_Value = "FooBar" 

Dim installer, database, view 

Set installer = CreateObject("WindowsInstaller.Installer") 
Set database = installer.OpenDatabase (MSI_FILE, 1) 

' Update 
Set view = database.OpenView ("UPDATE Property SET Value = '" & PROPERTY_STRING_Value & "' WHERE Property = 'MYPROPERTY'") 

' .. or Add (Insert) 
Set view = database.OpenView ("INSERT INTO Property (Property, Value) VALUES ('MYPROPERTY', '" & PROPERTY_STRING_Value & "')") 

view.Execute() 
database.Commit() 

Set database = Nothing 
Set installer = Nothing 
Set view = Nothing