Windows 10 Startmenü-Einstellungen Systemweit festlegen

<#

Skript zum endgültigen Entfernen von AppxPackages aus einer WIN10 install.wim vor der Verteilung. Das Skript mountet die install.wim einer vorhandenen iso-Datei, liest die AppXPackages aus und lässt den Benutzer
auswählen, welche deinstalliert werden sollen. Anschließend wird die veränderte install.wim kopiert die iso-Datei durch Unmount
geschlossen und alle Dateireste entfernt. 

Um OneDrive aus dem Image löschen zu können, muss das Modul NTFS Security vorhanden sein.

#>

# Modul NTFS Security importieren

Import-Module NTFSSecurity

# MessageBox Hinweis.

[System.Windows.Forms.MessageBox]::Show("Das Skript funktioniert nur ordnungsgemäß, wenn es auf WIN10 oder Windows Server 2016 ausgeführt wird.",0)  

# Überprüfe, ob aktuelle Powershell-Version installiert ist.

if ($PSVersionTable.PSVersion.Major -eq 5)
{
Write-Host "Die Powershell Überprüfung ist abgeschlossen, der Prozess wird fortgesetzt."  
Sleep 5
}
else
{
$PSVersionsAbfrage = [System.Windows.Forms.MessageBox]::Show("Die installierte Powershell Version ist veraltet. Installieren Sie die Version 5.1 des Windows Management Framework. Drücken Sie 'OK', um die Downloadseite zu öffnen, oder 'Abbrechen', um das Programm zu schließen.","Warnung",1, "Error")  
        If($PSVersionsabfrage -eq "OK") {  

$ie = New-Object -com InternetExplorer.Application 
$ie.visible=$true
$ie.navigate("https://www.microsoft.com/en-us/download/details.aspx?id=54616")   

           }
           else {
           Exit
           }
}

# ISO-Datei auswählen, MSACH Downloadseite öffnen oder Programm beenden.

$ISOAuswahlDialog = [System.Windows.MessageBox]::Show("Haben Sie bereits eine Win 10 ISO-Datei, die bearbeitet werden soll? Die Originaldatei wird nicht verändert! ","ISO-Abfrage","YesNoCancel","Question")  

          If($ISOAuswahlDialog -eq "Yes")  
           {

Function Get-File($initialDirectory)
{
    [System.Reflection.Assembly]::LoadWithPartialName("System.windows.forms") | Out-Null  
    
    $OpenFileDialog = New-Object System.Windows.Forms.OpenFileDialog
    $OpenFileDialog.initialDirectory = $initialDirectory
    $OpenFileDialog.filter = "ISO (*.iso)| *.iso"  
    $OpenFileDialog.title = "ISO-Datei zum Bearbeiten auswählen."  
    $OpenFileDialog.ShowDialog() | Out-Null
    $OpenFileDialog.filename
}

$ISO_Datei = Get-File
           }
           elseif ( $ISOAuswahlDialog -eq "No")  
           {
               $ie = New-Object -com InternetExplorer.Application 
               $ie.visible=$true
               $ie.navigate("https://XXXXXXXXXXXXXXXXXXX")   
           }
           else
           {
             Exit
           }

# Pfad zum Mounten der ISO-Datei festlegen.

Add-Type -AssemblyName System.Windows.Forms
$browser = New-Object System.Windows.Forms.FolderBrowserDialog
$browser.Description = "Mountpoint für ISO-Datei auswählen."  
$browser.rootfolder = "MyComputer"  
$null = $browser.ShowDialog()
$Mountpoint = $browser.SelectedPath

# Speicherort für veränderte install.wim.

Add-Type -AssemblyName System.Windows.Forms
$browser = New-Object System.Windows.Forms.FolderBrowserDialog
$browser.Description = "Speicherort für die manipulierte install.wim Datei auswählen."  
$browser.rootfolder = "MyComputer"  
$null = $browser.ShowDialog()
$Speicherort = $browser.SelectedPath

# ISO-Datei mounten.

Write-Host "Mounte ISO-Datei."  

$Gemountete_BearbeitungsISO = Mount-DiskImage $ISO_Datei -PassThru
$Laufwerksbuchstabe = ($Gemountete_BearbeitungsISO | Get-Volume).DriveLetter + ":\"  

Write-Host "Die ISO-Datei wurde unter dem Laufwerksbuchstaben $Laufwerksbuchstabe gemountet."  

# Kopiere install.wim in das oben ausgewählte Verzeichnis.

Write-Host "Kopiere die install.wim der bereitgestellten ISO-Datei in das ausgewählte Verzeichnis."  
Get-ChildItem $Laufwerksbuchstabe -Include install.wim -Recurse | Copy-Item -Destination $Speicherort

# Unmounte die ISO-Datei

Write-Host "Unmounte die ISO-Datei und arbeite mit der kopierten install.wim weiter."  
Dismount-DiskImage $ISO_Datei

#>

# Entferne den Schreibschutz aus dem install.wim, um den Prozess fortsetzen zu können.

Write-Host "Entferne den Schreibschutz der install.wim" und Pakete entfernen zu können.  
Get-ChildItem -Path $Speicherort -filter install.wim | Foreach-Object {
 
    # Abfragen ob die Datei schreibgeschützt ist
    If($_.IsReadOnly -eq $True) {
    
        # Ändern der Datei Attribute
        $_.Attributes = $_.Attributes -bxor [System.IO.FileAttributes]::ReadOnly
    }
}

# Mounte kopierte install.wim im zuvor angegebenen Verzeichnis.

Write-Host "Mounte kopierte install.wim im zuvor angegebenen Verzeichnis."  
$WIM = (Get-ChildItem -Path $Speicherort -filter install.wim).FullName

Dism /Mount-Image /ImageFile:"$WIM" /Index:1 /MountDir:$Mountpoint  

# InfoBox zum weiteren Vorgehen.

[System.Windows.Forms.MessageBox]::Show("Powershell listet jetzt alle App-Pakete des Installationsabbilds auf. Markieren Sie alle Pakete, die Sie DEINSTALLIEREN wollen und klicken Sie anschließend auf 'OK'. ",0)  

# Mithilfe des Get-AppXPackage Commandlet Programme auslesen und CSV-Datei speichern.

Get-ProvisionedAppXPackage -Path $Mountpoint | Out-GridView -PassThru | Remove-ProvisionedAppXPackage

# OneDrive Setup löschen

takeown /F "$Mountpoint\Windows\SysWOW64\OneDriveSetup.exe" /A  
Add-NTFSAccess -Path "$Mountpoint\Windows\SysWOW64\onedrivesetup.exe" -Account HKEY_USERS\S-1-5-21-2710068854-1454297416-3435442365-1001  -AccessRights FullControl  
Remove-Item "$Mountpoint\Windows\SysWOW64\onedrivesetup.exe"  

# OneDrive Setup aus Registry löschen

reg load HKEY_LOCAL_MACHINE\WIM $Mountpoint\Users\Default\ntuser.dat
reg delete "HKEY_LOCAL_MACHINE\WIM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run" /v OneDriveSetup /f  

# Cloudcontent bei Installation nicht zulassen

reg add HKEY_LOCAL_MACHINE\WIM\SOFTWARE\Policies\Microsoft\Windows\CloudContent
reg add HKEY_LOCAL_MACHINE\WIM\SOFTWARE\Policies\Microsoft\Windows\CloudContent /v DisableWindowsConsumerFeatures /t REG_DWORD /d 1 /f
reg unload HKEY_LOCAL_MACHINE\WIM

# MessageBox zum Abschluss.

[System.Windows.Forms.MessageBox]::Show("Die install.wim Datei wurde erfolgreich unter $Speicherort gespeichert.",0)  

# DisMount-WindowsImage -Path $Mountpoint -Save

Dism /Unmount-Image /MountDir:$Mountpoint /Commit

#Schließen des Programms.

DISM /Cleanup-MountPoints
Exit