使用powershell向现有的空com+应用程序包添加com+组件？

Question

我正在尝试尽可能地自动化我的服务器安装。

其中一部分包括创建COM+包(我目前使用PS来做这件事)。然后，我需要向这些空的应用程序包中添加组件。DLL已预先注册到RegASM。目前，我正在通过DCOM配置GUI手动添加组件(添加已经注册的组件\ 32bit组件)。然后，在添加每个组件之后，我通过属性设置每个组件的事务支持级别。在使用50+组件的应用程序中，这可能非常耗时，因此需要自动化。

我找到了一个删除特定组件的脚本...

$comCatalog = New-Object -ComObject COMAdmin.COMAdminCatalog
$appColl = $comCatalog.GetCollection("Applications")
$appColl.Populate()

$app = $appColl | where {$_.Name -eq "COMAPPNAME"}
$compColl = $appColl.GetCollection("Components", $app.Key)
$compColl.Populate()

$index = 0
foreach($component in $compColl) {
if ($component.Name -eq "SOMECOMPONENT.NAME") {
    $compColl.Remove($index)
    $compColl.SaveChanges()
}
$index++
}

..。修改上面的内容，这是我到目前为止所知道的，但是它与Bitness和Transaction选项存在错误。如果没有这些，它运行时不会出现错误。但是，似乎什么都没有发生。我的COM+应用程序中没有出现任何组件。

$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
$apps = $comAdmin.GetCollection(“Applications”)
$apps.Populate();
$app = $apps | where {$_.Name -eq "App1"}
$compColl = $apps.GetCollection("Components", $app.Key)
$compColl.Populate()
$component = $compColl.Add
$component.Value(“Bitness”) = 0x1
$component.Value(“Transaction”) = 2
$component.Name -eq "App1.Component1" 
$compColl.SaveChanges()

$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog
$apps = $comAdmin.GetCollection(“Applications”)
$apps.Populate();
$app = $apps | where {$_.Name -eq "App1"}
$compColl = $apps.GetCollection("Components", $app.Key)
$compColl.Populate()
$component = $compColl.Add
$component.Value(“Bitness”) = 0x1
$component.Value(“Transaction”) = 3
$component.Name -eq "App1.Component2" 
$compColl.SaveChanges()

任何帮助都将不胜感激！谢谢!

Answer 1

我找到了一个合适的解决方案：

$comAdmin = New-Object -comobject COMAdmin.COMAdminCatalog;
$comAdmin.InstallComponent("ApplicationName", [DLL containing components]);

这正是我所需要的。