[英]How to programmatically read the properties inside an MSI file?
有没有办法读取msi文件中的属性?
例如给定一个 msi 文件名 Testpackage.msi
我需要找到
productName
PackageCode
version
这我将与 WMI 卸载一起使用
string objPath = string.Format("Win32_Product.IdentifyingNumber='{0}',Name='{1}',Version='{2}'", "{AC9C1263-2BA8-4863-BE18-01232375CE42}", "testproduct", "10.0.0.0");
更新:使用 Orca 是一个很好的选择,如果这可以通过编程实现,那么我可以使用它来生成自动发行说明。 并在卸载程序中。
WiX 工具集: WiX 快速入门技巧(资源链接集合)。 WiX 安装 DTF。
我只想提一下,现在事情变得更容易了。 Windows Installer 对象模型有一个完整的 .NET 包装器,因此您可以避免任何 COM 互操作笨拙。
DTF - 入门:主文件:
Microsoft.Deployment.WindowsInstaller.dll
- 下载并安装 WiX 工具包
- 在
WixInstallPath\\SDK
目录中找到以下文件
该包装器称为“部署工具基础”(DTF),基本描述如下:“部署工具基础是一组丰富的 .NET 类库和相关资源,它们共同将 Windows 部署平台技术带入了 .NET 世界。它旨在大大简化与部署相关的开发任务,同时仍然暴露底层技术的完整功能”。
这是一个精简的动手示例:
using (var db = new Database(FullPath, DatabaseOpenMode.ReadOnly))
{
PackageCode = db.SummaryInfo.RevisionNumber;
AppVendor = db.SummaryInfo.Author;
AppName = db.SummaryInfo.Title;
ProductName = db.SummaryInfo.Subject;
ProductCode = (string)db.ExecuteScalar("SELECT `Value` FROM "+
"`Property` WHERE `Property` = 'ProductCode'");
AppVersion = (string)db.ExecuteScalar("SELECT `Value` FROM "+
"`Property` WHERE `Property` = 'ProductVersion'");
UpgradeCode = (string)db.ExecuteScalar("SELECT `Value` FROM "+
" `Property` WHERE `Property` = 'UpgradeCode'");
}
主要 DTF 文件(后两个是最常用的):
只需创建一个 C# 项目,引用这些文件,并使用您想要和需要的任何控件编写您自己的部署应用程序。 我目前没有设置 DTF 工具,但请参阅此示例以了解 C# 程序如何工作的一般概念。
您可以使用基于 COM 的 API 来处理 MSI ,并执行类似的操作
Function GetVersion(ByVal msiName)
Const msiOpenDatabaseModeReadOnly = 0
Dim msi, db, view
Set msi = CreateObject("WindowsInstaller.Installer")
Set db = msi.OpenDataBase(msiName, msiOpenDatabaseModeReadOnly)
Set view = db.OpenView("SELECT `Value` FROM `Property` WHERE `Property` = 'ProductVersion'")
Call view.Execute()
GetVersion = view.Fetch().StringData(1)
End Function
你可以使用微软的 Orca.exe 。 Orca 将允许您打开 MSI 并编辑/查看其中的所有表。 您必须下载整个Windows SDK才能获得它,但幸运的是它是免费的。
一种替代方法(由于 SDK 的下载大小可能会更快)是使用WiX 项目中的dark.exe。 Dark 是一个 MSI 反编译器,它将所有内容导出为 XML 文件和资源集合。 它输出的 XML 将包含您正在寻找的信息。
这是 VBScript 中的一个类似示例,我将其用作创建引导程序可执行文件的构建过程的一部分...
Option Explicit
Const MY_MSI = "product.msi"
Dim installer, database, view, result, sumInfo, sPackageCode
Set installer = CreateObject("WindowsInstaller.Installer")
Set database = installer.OpenDatabase (MY_MSI, 0)
Set sumInfo = installer.SummaryInformation(MY_MSI, 0)
sPackageCode = sumInfo.Property(9) ' PID_REVNUMBER = 9, contains the package code.
WScript.Echo "ProductVersion=" & getproperty("ProductVersion")
WScript.Echo "ProductCode=" & getproperty("ProductCode")
WScript.Echo "PackageCode=" & sPackageCode
WScript.Echo "ProductName=" & getproperty("ProductName")
Function getproperty(property)
Set view = database.OpenView ("SELECT Value FROM Property WHERE Property='" & property & "'")
view.Execute
Set result = view.Fetch
getproperty = result.StringData(1)
End Function
我在lessmsi 中找到了一个轻量级的非编程解决方案。 它显然使用 wix 并将整个 .msi 分解到指定的文件夹中。 (它也有一个用户界面,但它在 Win7 上对我来说效果不佳)。
声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.