システムに Office をインストールせずに、64 ビット システムで DSOFile を使用して、Office ファイルから Office メタデータ プロパティを取得しようとしています。オンラインで入手した 64 ビット バージョンを登録しましたが、初めて実行したときに動作します。2 回目は PS コンソールがクラッシュします。閉じていることを考えると、なぜそれができるのかわかりません。
(リンク: http://www.keysolutions.com/blogs/kenyee.nsf/d6plinks/KKYE-79KRU6 )
コード:
[System.Reflection.Assembly]::LoadFrom('C:\TEMP\Interop.DSOFile.dll')
function Get-Summary([string]$file) {
$oled = New-Object -COM DSOFile.OleDocumentProperties
$oled.Open($file, $true, [DSOFile.dsoFileOpenOptions]::dsoOptionDefault)
$spd = $oled.SummaryProperties
return $spd
$oled.close()
}
Get-Summary ('Z:\SCRIPTS\TestFiles\color-difference.xls')
エラー:
A share violation has occurred. (Exception from HRESULT: 0x80030020
(STG_E_SHAREVIOLATION))
At Z:\SCRIPTS\test03.ps1:7 char:5
+ $oled.Open($file, $true, [DSOFile.dsoFileOpenOptions]::dsoOptionD ...
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
+ CategoryInfo : OperationStopped: (:) [], COMException
+ FullyQualifiedErrorId : System.Runtime.InteropServices.COMException
編集:
次のように関数内にオブジェクトを作成することで回避しました。
[System.Reflection.Assembly]::LoadFrom('C:\TEMP\Interop.DSOFile.dll')
function Get-Summary([string]$item) {
$oled = New-Object -TypeName DSOFile.OleDocumentPropertiesClass
$oled.Open($item)
$spd = [PSCustomObject]@{
Title = $oled.SummaryProperties.Title
Subject = $oled.SummaryProperties.Subject
Author = $oled.SummaryProperties.Author
DateCreated = $oled.SummaryProperties.DateCreated
LastSavedBy = $oled.SummaryProperties.LastSavedBy
DateLastSaved = $oled.SummaryProperties.DateLastSaved
Keywords = $oled.SummaryProperties.Keywords
}
$spd
$oled.close($item)
}
$officeInfo = Get-Summary('Z:\SCRIPTS\TestFiles\color-difference.xls')
$officeInfo