create browser-friendly copies of emails
This commit is contained in:
parent
647bcdfe53
commit
47eb51e551
@ -19,12 +19,21 @@ Get-ChildItem './Sandbox Scripts'| Where-Object { $_.name -match '\.zip'} | ForE
|
|||||||
Write-Output "Installing Programs...";
|
Write-Output "Installing Programs...";
|
||||||
Start-Process "C:\Users\WDAGUtilityAccount\Desktop\Sandbox Scripts\7zip.exe" -NoNewWindow -Wait -ArgumentList /S;
|
Start-Process "C:\Users\WDAGUtilityAccount\Desktop\Sandbox Scripts\7zip.exe" -NoNewWindow -Wait -ArgumentList /S;
|
||||||
$sevenZip = "C:\Program Files\7-Zip\7z.exe";
|
$sevenZip = "C:\Program Files\7-Zip\7z.exe";
|
||||||
|
$outputs = @(); #Keep a record of where our new files are
|
||||||
foreach ($file in $files.GetEnumerator()){
|
foreach ($file in $files.GetEnumerator()){
|
||||||
Write-Output "Extracting $($file.Name)";
|
Write-Output "Extracting $($file.Name)";
|
||||||
$archivePath = "C:\Users\WDAGUtilityAccount\Desktop\Sandbox Scripts\$($file.Name)"
|
$archivePath = "C:\Users\WDAGUtilityAccount\Desktop\Sandbox Scripts\$($file.Name)"
|
||||||
$outputPath = "C:\Users\WDAGUtilityAccount\Desktop\$($file.Name)";
|
$outputPath = "C:\Users\WDAGUtilityAccount\Desktop\$($file.Name)";
|
||||||
$password = $($file.Value);
|
$password = $($file.Value);
|
||||||
$arguments = "$($archivePath)", "-o$($outputPath)", "-p$($password)";
|
$arguments = "$($archivePath)", "-o$($outputPath)", "-p$($password)";
|
||||||
&$sevenZip e $arguments;
|
&$sevenZip e $arguments; #Extract zip
|
||||||
|
$outputs += $outputPath;
|
||||||
|
}
|
||||||
|
|
||||||
|
# Process the extracted email files
|
||||||
|
foreach( $dir in $outputs.GetEnumerator()){
|
||||||
|
Get-ChildItem "$($dir)\" | Where-Object { $_.name -match '\.eml'} | ForEach-Object{
|
||||||
|
Copy-Item "$($dir)/$($_.name)" "$($dir)/$($_.name).mht"
|
||||||
|
}
|
||||||
}
|
}
|
||||||
Write-Output Done;
|
Write-Output Done;
|
||||||
Loading…
x
Reference in New Issue
Block a user