19 lines
493 B
PowerShell
19 lines
493 B
PowerShell
$documents_path = 'e:\doc2pdf'
|
|
|
|
$word_app = New-Object -ComObject Word.Application
|
|
|
|
# This filter will find .doc as well as .docx documents
|
|
Get-ChildItem -Path $documents_path -Filter *.doc? | ForEach-Object {
|
|
|
|
$document = $word_app.Documents.Open($_.FullName)
|
|
|
|
$pdf_filename = "$($_.DirectoryName)\$($_.BaseName).pdf"
|
|
|
|
$document.SaveAs([ref] $pdf_filename, [ref] 17)
|
|
|
|
$document.Close()
|
|
}
|
|
|
|
$word_app.Quit()
|
|
|
|
#$documents_path = Split-Path -parent $MyInvocation.MyCommand.Path |