1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28
|
$MonFolder = Get-ChildItem -Path $varCheminRepertoireScript -File #On récupère la liste des fichiers de ce répertoire
$scanlogdir="C:\Users\212392697\Documents\Cardio\Fichier MAC 7 et MAC 5\testconvert\Log"
# Create a Log file $scanlogname
$scanlogname = Join-Path -Path $scanlogdir -ChildPath "$(Get-Date -Format 'MM-dd-yyyy').log"
foreach ($MyFile in $MonFolder)
{
# Get the List of files in the Directory
echo "$(get-date) - Checking for any scanned pdf files in $scandir" | Out-File -Append $MyFile.name
Add-Type -AssemblyName System.Drawing
$doc = New-Object System.Drawing.Printing.PrintDocument
$doc.DocumentName = $MyFile.name
$doc.PrinterSettings = new-Object System.Drawing.Printing.PrinterSettings
$doc.PrinterSettings.PrinterName = 'Microsoft Print to PDF'
$doc.PrinterSettings.PrintToFile = $true
$file=[io.fileinfo]$MyFile.name
#echo "$(get-date) - Checking for any scanned pdf files in $scandir" | Out-File -Append [io.path]::Combine($file.DirectoryName, $file.BaseName) + 'converti.pdf'
$pdf= [io.path]::Combine($file.DirectoryName, $file.BaseName) + 'converti.pdf'
Write-Host."$file.DirectoryName"
Write-Host."$file.BaseName"
Write-Host "$pdf"
$doc.PrinterSettings.PrintFileName = $pdf
$doc.Print()
$doc.Dispose()
} |
Partager