Ordnerstruktur lesen, Dateien - Neue Ordnerstruktur

$pfad_allgemein = "c:\quelle"  
$pfad_allgemein_pdf = "d:\bearbeitet"  
$pfad_allgemein_pdf_a = "d:\bearbeitet\pdfa""  

dir -Path $pfad_allgemein -Include *.df1, *.dx1, *.ff1 -recurse | foreach {
$zielDir = $_.DirectoryName.Replace($pfad_allgemein, $pfad_allgemein_pdf)
$zielDir_pdfa = $_.DirectoryName.Replace($pfad_allgemein, $pfad_allgemein_pdf_a)
Write-Host "Zielverzeichnis " $zielDir  
new-item -ItemType Directory -Path $zielDir -Force
new-item -ItemType Directory -Path $zielDir_pdfa -Force
		
}

$DATDateien = gci -Path $pfad_allgemein -Include *.df1, *.dx1, *.ff1 -recurse
ForEach ($used_dat in $DATDateien)
		{
			$objword = New-Object -ComObject word.application
			$objword.visible = $false
			$filepath = Join-Path -Path $zielDir -ChildPath ($used_dat.name + ".pdf")  
			$doc = $objword.documents.Open($used_dat.FullName)
			
			$objword.selection.pagesetup.topmargin = 30
			$objword.selection.pagesetup.leftmargin = 20
			$objword.selection.pagesetup.rightmargin = 10
			$objword.selection.pagesetup.bottommargin = 30
			$selection = $objword.Selection
			$selection.Font.Name = $schriftart
			$selection.Font.Size = $schriftart_groesse_allgmein
			$printout_pagesize = "wdPaper$seite_groesse"  
			$selection.PageSetup.PaperSize = [Microsoft.Office.Interop.Word.WdPaperSize]::$printout_pagesize
			$selection.PageSetup.Orientation = $printout_page_set
					
			$doc.SaveAs([ref]$filepath, [ref]17) #17 steht für PDF
			$doc.Saved = $true
			
			$doc.Close()
			$objword.Quit()
			[System.Runtime.Interopservices.Marshal]::ReleaseComObject($objword)
			
		}

......
hier geht er dann zum zweiten Schritt, zur Umwandlung pdfa....
		

###### Ab hier Konvertierung von pdf nach pdf/a

$oPDFCreator = New-Object -ComObject "PDFCreator.clsPDFCreator"  
$oPDFCreatorfiles = gci -Path $pfad_allgemein_pdf -Include *.pdf -Recurse
	
foreach ($pdf_a in $oPDFCreatorfiles)
{
$zielDirpdfa = $pdf_a.DirectoryName.Replace($pfad_allgemein_pdf, $pfad_allgemein_pdf_a)

If (!(Test-Path $zielDirpdfa)) { new-item -ItemType Directory -Path $zielDirpdfa -Force }
		
		$filename_pdfa = Join-Path -Path $zielDirpdfa -ChildPath ($pdf_a.name + ".pdf")  
		
$filename = $pdf_a.FullName

Start-Sleep -m 10000 # 10 Sekunden

if (Test-Path $pdftool_x86)
{
Start-Process $pdftool_x86 ('/IF"' + $filename + '" /OF"' + $filename_pdfa + '" /NoStart /OutputSubFormat"PDF/A-1b"')  
}
else
{
Start-Process $pdftool_x64 ('/IF"' + $filename + '" /OF"' + $filename_pdfa + '" /NoStart /OutputSubFormat"PDF/A-1b"')  
}
([System.Runtime.InteropServices.Marshal]::ReleaseComObject($oPDFCreator) -gt 0)
		
}

$oPDFCreatorfiles = gci -Path $pfad_allgemein_pdf -Include *.pdf -Recurse 

foreach ($pdf_a in $oPDFCreatorfiles)
{
$zielDirpdfa = $pdf_a.DirectoryName.Replace($pfad_allgemein_pdf, $pfad_allgemein_pdf_a)

If (!(Test-Path $zielDirpdfa)) { new-item -ItemType Directory -Path $zielDirpdfa -Force }
		
		$filename_pdfa = Join-Path -Path $zielDirpdfa -ChildPath ($pdf_a.name + ".pdf")