以编程方式访问Word 2007文档的文档属性
问题描述:
有没有一种方法可以以编程方式访问Word 2007文档的文档属性?以编程方式访问Word 2007文档的文档属性
我愿意为此使用任何语言,但理想情况下它可能是通过PowerShell脚本。
我的总体目标是遍历文件系统上某处的文档,解析这些文档的某些文档属性,然后将所有这些属性整理回新的Word文档。
我基本上想要自动创建一个文件,它是文件系统某个文件夹下所有文件的列表;并且此列表将包含诸如标题,摘要和作者文档属性; CreateDate字段;等等。
答
我的猜测是你最好的选择是VB or C#和Office Interop Assemblies。我不知道原生的方式(在Powershell内部)做你想做的事。
也就是说,如果你使用VB或C#,你可以编写一个powershell cmdlet你是什么样的排序规则。但就此而言,编写一个作为计划任务运行的控制台应用程序可能更简单。
答
我最近从观看DNRTV节目中了解到Office 2007文档只是压缩XML。因此,您可以将“Document.docx”更改为“Document.docx.zip”并查看其中的XML文件。您可能可以通过.NET中的互操作程序集来获取属性,但是查看正确的XML可能更有效(可能使用LINQ to XML或我不知道的某种本地方式)。
答
我需要在未安装MS Office应用程序的服务器上运行的PowerShell中执行此操作。如上所示,诀窍是查看办公文件并检查其中的嵌入式xml文件。
这是一个像cmdlet一样运行的函数,这意味着您可以简单地将脚本保存到PowerShell脚本目录中,并从任何其他PowerShell脚本中调用该函数。
# DocumentOfficePropertiesGet
# Example usage
# From a PowerShell script:
# $props = Invoke-Expression "c:\PowerShellScriptFolder\DocumentOfficePropertiesGet.ps1 -DocumentFullPathName ""d:\documents\my excel doc.xlsx"" -OfficeProperties ""dcterms:created;dcterms:modified"""
# Parameters
# DocumentFullPathName -- full path and name of MS Office document
# OfficeProperties -- semi-colon delimited string of property names as they
# appear in the core.xml file. To see these names, rename any
# MS Office document file to have the extension .zip, then look inside
# the zip file. In the docProps folder open the core.xml file. The
# core document properties are nodes under the cp:coreProperties node.
# Example: dcterms:created;dcterms:modified;cp:lastModifiedBy
# Return value
# The function returns a hashtable object -- in the above example, $props would contain
# the name-value pairs for the requested MS Office document properties. In the calling script,
# to get at the values:
# $fooProperty = $props.'dcterms:created'
# $barProperty = $props.'dcterms:modified'
[CmdletBinding()]
[OutputType([System.Collections.Hashtable])]
Param
(
[Parameter(Position=0,
Mandatory=$false,
HelpMessage="Enter the full path name of the document")]
[ValidateNotNullOrEmpty()]
[String] $DocumentFullPathName='e:\temp\supplier_List.xlsx',
[Parameter(Position=1,
Mandatory=$false,
HelpMessage="Enter the Office properties semi-colon delimited")]
[ValidateNotNullOrEmpty()]
[String] $OfficeProperties='dcterms:created; dcterms:modified ;cp:lastModifiedBy;dc:creator'
)
# We need the FileSystem assembly
Add-Type -AssemblyName System.IO.Compression.FileSystem
# This function unzips a zip file -- and it works on MS Office files directly: no need to
# rename them from foo.xlsx to foo.zip. It expects the full path name of the zip file
# and the path name for the unzipped files
function Unzip
{
param([string]$zipfile, [string]$outpath)
[System.IO.Compression.ZipFile]::ExtractToDirectory($zipfile, $outpath) *>$null
}
# Remove spaces from the OfficeProperties parameter
$OfficeProperties = $OfficeProperties.replace(' ','')
# Compose the name of the folder where we will unzip files
$zipDirectoryName = $env:TEMP + "\" + "TempZip"
# delete the zip directory if present
remove-item $zipDirectoryName -force -recurse -ErrorAction Ignore | out-null
# create the zip directory
New-Item -ItemType directory -Path $zipDirectoryName | out-null
# Unzip the files -- i.e. extract the xml files embedded within the MS Office document
unzip $DocumentFullPathName $zipDirectoryName
# get the docProps\core.xml file as [xml]
$coreXmlName = $zipDirectoryName + "\docProps\core.xml"
[xml]$coreXml = get-content -path $coreXmlName
# create an array of the requested properties
$requiredProperties = $OfficeProperties -split ";"
# create a hashtable to return the values
$docProperties = @{}
# Now look for each requested property
foreach($requiredProperty in $requiredProperties)
{
# We will be lazy and ignore the namespaces. We need the local name only
$localName = $requiredProperty -split ":"
$localName = $localName[1]
# Use XPath to fetch the node for this property
$thisNode = $coreXml.coreProperties.SelectSingleNode("*[local-name(.) = '$localName']")
if($thisNode -eq $null)
{
# To the hashtable, add the requested property name and its value -- null in this case
$docProperties.Add($RequiredProperty, $null)
}
else
{
# To the hashtable, add the requested property name and its value
$docProperties.Add($RequiredProperty, $thisNode.innerText)
}
}
#clean up
remove-item $zipDirectoryName -force -recurse
# return the properties hashtable. To do this, just write the object to the output stream
$docProperties