SharePoint vol? Zo maak je ruimte vrij

# Configuration $CONFIG = @{ APP_NAME = “SharePointVersionCleaner”
VALID_SP_URL_PATTERN = “^https://[a-zA-Z0-9]+-my\.sharepoint\.com|^https://[a-zAZ0-9]+\.sharepoint\.com” } function Connect-ToSharePoint { try { $script:TenantName =
Read-Host “Voer je tenant naam in (bijvoorbeeld: contoso.onmicrosoft.com)”
$script:SharePointRootSite = Read-Host “Voer de SharePoint root site URL in” if (-not
($script:SharePointRootSite -match $CONFIG.VALID_SP_URL_PATTERN)) { throw
“Ongeldige SharePoint URL. Gebruik format: https://[tenant].sharepoint.com” } WriteHost “Registreren van Entra ID applicatie…” -ForegroundColor Yellow $Output =
Register-PnPEntraIDAppForInteractiveLogin -ApplicationName $CONFIG.APP_NAME –
Tenant $script:TenantName -Interactive # Zoek naar de regel met de ClientId
$script:ClientId = $output | Select-String -Pattern “ClientId\s+([\w-]+)” | ForEach-Object {
$_.Matches.Groups[1].Value } # Verbind met de nieuwe app registratie ConnectPnPOnline -Url $script:SharePointRootSite -Interactive -ClientId $script:ClientId WriteHost “Succesvol verbonden met SharePoint Online!” -ForegroundColor Green return
$true } catch { Write-Host “Fout bij verbinden: $($_.Exception.Message)” –
ForegroundColor Red return $false } } function Connect-ToTeamSite { try {
$script:TeamSiteUrl = Read-Host “Voer de URL in van de TeamSite waar je versies wilt
opschonen” if (-not ($script:TeamSiteUrl -match $CONFIG.VALID_SP_URL_PATTERN)) {
throw “Ongeldige SharePoint URL. Gebruik format:
https://[tenant].sharepoint.com/sites/[site]” } # Verbind met de TeamSite met dezelfde
ClientId Connect-PnPOnline -Url $script:TeamSiteUrl -Interactive -ClientId
$script:ClientId Write-Host “Succesvol verbonden met TeamSite!” -ForegroundColor
Green return $true } catch { Write-Host “Fout bij verbinden met TeamSite:
$($_.Exception.Message)” -ForegroundColor Red return $false } } function GetDocumentLibraries { try { $libraries = Get-PnPList | Where-Object { $_.BaseTemplate -eq
101 } | Select-Object Title, Id Write-Host “Beschikbare documentbibliotheken:” –
ForegroundColor Cyan $libraries | Format-Table return $libraries } catch { Write-Host
“Fout bij ophalen van documentbibliotheken: $($_.Exception.Message)” –
ForegroundColor Red return $null } } function Clean-FileVersions { param (
[string]$LibraryName ) try { # Haal alle bestanden op uit de documentbibliotheek $files =
Get-PnPListItem -List $LibraryName -PageSize 500 | Where-Object {
$_.FileSystemObjectType -eq “File” } # Controleer of er bestanden zijn gevonden if ($null
-eq $files -or $files.Count -eq 0) { Write-Host “Geen bestanden gevonden in de
bibliotheek ‘$LibraryName’.” -ForegroundColor Red return } Write-Host “Gevonden:
$($files.Count) bestanden in de bibliotheek.” -ForegroundColor Cyan # Verwerk elk
bestand foreach ($file in $files) { try { Write-Host “Verwerken van bestand:
$($file.FieldValues.FileLeafRef)” -ForegroundColor Cyan # Haal bestandsversies op
$fileUrl = $file.FieldValues.FileRef $versions = Get-PnPFileVersion -Url $fileUrl # Tel het
totaal aantal versies $totalVersions = $versions.Count Write-Host ” Totaal aantal versies:
$totalVersions” # Als er meer dan 10 versies zijn, verwijder de oudste if ($totalVersions –
gt 10) { $versionsToDelete = $versions | Sort-Object -Property Created -Descending |
Select-Object -Skip 10 Write-Host ” Verwijderen van $($versionsToDelete.Count) oude
versies…” -ForegroundColor Yellow foreach ($versionToDelete in $versionsToDelete) {
Write-Host ” Verwijderen versie: $($versionToDelete.VersionLabel) gemaakt op
$($versionToDelete.Created)” Remove-PnPFileVersion -Url $fileUrl -Identity
$versionToDelete.ID -Force } } else { Write-Host ” Geen versies om te verwijderen (10 of
minder versies aanwezig)” -ForegroundColor Green } } catch { Write-Host “Fout bij
verwerken van bestand $($file.FieldValues.FileLeafRef): $_” -ForegroundColor Red } } }
catch { Write-Host “Fout bij opschonen van versies: $($_.Exception.Message)” –
ForegroundColor Red } } # Main script try { # Stap 1: Verbind met SharePoint if (-not
(Connect-ToSharePoint)) { throw “Kon niet verbinden met SharePoint.” } # Stap 2: Verbind
met specifieke TeamSite if (-not (Connect-ToTeamSite)) { throw “Kon niet verbinden met
TeamSite.” } # Stap 3: Toon beschikbare documentbibliotheken $libraries = GetDocumentLibraries if ($null -eq $libraries) { throw “Kon geen documentbibliotheken
ophalen.” } # Stap 4: Vraag welke bibliotheek opgeschoond moet worden $libraryName =
Read-Host “Voer de naam in van de documentbibliotheek om op te schonen” # Stap 5:
Schoon bestandsversies op Clean-FileVersions -LibraryName $libraryName Write-Host
“Opschonen van versies voltooid!” -ForegroundColor Green } catch { Write-Host “Er is
een fout opgetreden: $($_.Exception.Message)” -ForegroundColor Red } finally { #
Verbreek de verbinding met SharePoint Disconnect-PnPOnline Write-Host “Verbinding
met SharePoint verbroken.” -ForegroundColor Cyan }