Question

我需要在powershell中创建一个脚本，用来将我的所有文件从.rtf转换为.doc然后再转换回来。我想这样做是因为我已经应用了注册表修复，这将减少我的rtf文件在转换后的大小（它不会保存第二个WMF图像specyfic信息http://support.microsoft.com/kb/224663）。我想我的脚本工作流程为RTF_1保存到doc然后关闭rtf1删除rtf 1，将doc保存到rtf2，关闭doc，删除doc。

Answer 1

这是最终的工作脚本（没有删除，我决定我不需要它）

param([string]$rtfpath,[string]$docpath = $rtfpath,[string]$docpath2 = $rtfpath2)
$srcfiles = Get-ChildItem $rtfPath -filter "*.rtf"
$docfiles = Get-ChildItem $docPath -filter "*.doc"
$saveFormat =[Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatDocument");
$saveFormat_back =[Enum]::Parse([Microsoft.Office.Interop.Word.WdSaveFormat], "wdFormatRTF");
$word = new-object -comobject word.application
$word.Visible = $False
function saveas-DOC
     {

  $name = $rtf.basename
  $savepath ="$docpath\rtf" + $name + ".doc"
  write-host $name
  Write-Host $savepath
         $opendoc = $word.documents.open($rtf.FullName);
         $opendoc.saveas([ref]$savepath, [ref]$saveFormat);
         $opendoc.close();
     }

function saveas-back_to_rtf
{
         $name = $doc.basename
   $savepath2 ="$rtfpath2\doc" + $name + ".rtf"
   write-host $name
   Write-Host $savepath
         $opendoc = $word.documents.open($doc.FullName);
         $opendoc.saveas([ref]$savepath2, [ref]$saveFormat_back);
         $opendoc.close();

}

ForEach ($rtf in $srcfiles)
     {
         Write-Host "Processing :" $rtf.FullName
         saveas-DOC

     }

ForEach ($doc in $docfiles)
     {
         Write-Host "Processing doc file :" $doc.FullName
         saveas-back_to_rtf
         $doc = $null
     }


$word.quit();

将.rtf文件转换为.doc，然后将.doc转换回PowerShell中的.rtf（WMF注册表修复） - 文件大小优化

1 个答案: