Bienvenue à Blogs CodeS-SourceS Identification | Inscription | Aide

Blog Technique de Romelard Fabrice

Les dernières Actualités de Romelard Fabrice (Alias fabrice69 ou F___) principalement autour des technologies Microsoft

Actualités

  • Toutes les actualités et informations sur les technologies Microsoft principalement autour de .NET et SQL Server

Archives

SharePoint 20XX: Script PowerShell pour exporter en CSV toutes les listes d’une ferme pour auditer le contenu avant migration

Dans un précédent message, nous avons pu comprendre comment nettoyer notre ferme SharePoint des listes vides:

Maintenant que celle-ci est “propre”, il convient de faire un assessment des listes contenues dans ces sites, sous-sites, … pour avoir une vue d’ensemble de la complexité du contenu à migrer et pouvoir se préparer au mieux.

Ce script va donc exporter pour vous un fichier CSV qu’il vous conviendra de manipuler selon votre besoin (via Excel, SQL Server, …).

Il reste dans le même esprit que la solution que Benoit Jester a publié pour l’exportation des sites et sous-sites d’une ferme:

Vous avez très peu de chose à paramétrer pour exécuter ce script en tant qu’administrateur sur un serveur de la ferme SharePoint.

param(
    [Parameter(Mandatory=$False)]
     [bool]$displayMessages = $true,
    [Parameter(Mandatory=$False)]
     [string]$SMTPServer="",
    [Parameter(Mandatory=$False)]
     [string]$ToEmailAddress="",
    [Parameter(Mandatory=$False)]
     [string]$FromEmailAddress="",
    [Parameter(Mandatory=$False)]
     [string]$delimiter="|"
)

[array]$ExceptionListnames = "List Template Gallery", "Master Page Gallery", "Site Template Gallery", "Web Part Gallery", "User Information List", "Settings", "Galería de plantillas de sitios", "Galería de plantillas de listas", "Galerie de modèles de sites", "Galerie de modèles de listes"

[string]$FarmType = "YOUR INTRANET TEAMSITES"
[string]$FolderToPutCSVName = "C:\TEMP\"
[string]$CSVFileName = "Lists-Usage-YourTeamsites.CSV"
[string]$ColorToShow = "green"
[string]$MyListIndexedColumns = ""
$pattern = '[^a-zA-Z]'
[string]$ColumnTitleCleaned = ""

# Applies Read Access to the specified accounts for a web application
Function Add-UserPolicy([String]$url)
{
    Try
    {
        $webapp = [Microsoft.SharePoint.Administration.SPWebApplication]::Lookup("$url")
        $user = ([Security.Principal.WindowsIdentity]::GetCurrent()).Name
        $displayName = "Sites Usage Read Account"
        $perm = "Full Read"
       
        # If the web app is not Central Administration
        If ($webapp.IsAdministrationWebApplication -eq $false)
        {
            # If the web app is using Claims auth, change the user accounts to the proper syntax
            If ($webapp.UseClaimsAuthentication -eq $true)
            {$user = 'i:0#.w|'+$user}
            [Microsoft.SharePoint.Administration.SPPolicyCollection]$policies = $webapp.Policies
            [Microsoft.SharePoint.Administration.SPPolicy]$policy = $policies.Add($user, $displayName)
            [Microsoft.SharePoint.Administration.SPPolicyRole]$policyRole = $webapp.PolicyRoles | where {$_.Name -eq $perm}
            If ($policyRole -ne $null)
            {$policy.PolicyRoleBindings.Add($policyRole)}
            $webapp.Update()
            If($displayMessages)
            {Write-Host -ForegroundColor White " Read access applied for `"$user`" account to `"$url`""}
        }
    }
    Catch
    {
        $_
        Write-Warning "An error occurred applying Read access for `"$user`" account to `"$url`""
    }
}

# Load assemblies
Function Load-Assemblies
{
    Try
    {
        If ((Get-PsSnapin |?{$_.Name -eq "Microsoft.SharePoint.PowerShell"})-eq $null)
        {
            If($displayMessages)
            {
                Write-Host -ForegroundColor Green "-----------------------------------------"
                Write-Host -ForegroundColor Green " - Loading SharePoint Powershell Snapin -"
                Write-Host -ForegroundColor Green "-----------------------------------------"
            }
            Add-PsSnapin Microsoft.SharePoint.PowerShell -ErrorAction Stop | Out-Null
        }
    }
    Catch
    {
        If($displayMessages)
        {
            Write-Host -ForegroundColor Green "------------------------------------------"
            Write-Host -ForegroundColor Green " - Loading Microsoft.SharePoint Assembly -"
            Write-Host -ForegroundColor Green "------------------------------------------"
        }
        [System.Reflection.Assembly]::LoadWithPartialName("Microsoft.SharePoint") | Out-Null
    }
}

# Send Email with log file as attachment
Function SendEmail($attachment)
{
    Try
    {
        If($displayMessages)
        {
            Write-Host -ForegroundColor White "--------------------------------------------------------------"
            Write-Host -ForegroundColor White " Sending Email to $ToEmailAddress with $attachment in attachment."
        }
        Send-MailMessage -To $ToEmailAddress -From $FromEmailAddress -Subject "Sites Usage - $env:COMPUTERNAME" -SmtpServer $SMTPServer -Attachments $attachment
       
        If($displayMessages)
        {Write-Host -ForegroundColor Green " Email sent successfully to $ToEmailAddress"}
    }
    Catch
    {Write-Warning $_}
}

$DateStarted = $(Get-date)

If($displayMessages)
{
    Write-Host -ForegroundColor Green "----------------------------------"
    Write-Host -ForegroundColor Green "- Script started on $DateStarted -"
    Write-Host -ForegroundColor Green "----------------------------------"
}
# Check Permission Level
If (-NOT ([Security.Principal.WindowsPrincipal] [Security.Principal.WindowsIdentity]::GetCurrent()).IsInRole([Security.Principal.WindowsBuiltInRole] "Administrator"))
{Write-Warning "You don't have Administrator rights to run this script."}
else
{
    If($SMTPServer)
    {
        If (!$ToEmailAddress -or !$FromEmailAddress)
        {
            Write-Warning "Please specify a 'ToEmailAddress' and a 'FromEmailAddress' parameter."
            Exit
        }
    }
    # Load assemblies
    Load-Assemblies

    # Local variables
    $sitesList = $null
    $sitesList = @()

    # Build structure
    $itemStructure = New-Object psobject
    $itemStructure | Add-Member -MemberType NoteProperty -Name "FarmType" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "SPWebAppURL" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "SPSiteCollURL" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "SPWebURL" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListTitle" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListGUID" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListCreated" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListLastModifiedDate" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListDefaultViewURL" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListTemplate" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListItemsNumber" -value ""
    $itemStructure | Add-Member -MemberType NoteProperty -Name "ListIndexedColumns" -value ""
   
    If($displayMessages)
    {
        Write-Host -ForegroundColor Green "-----------------------"
        Write-Host -ForegroundColor Green " - Scanning All Sites -"
        Write-Host -ForegroundColor Green "-----------------------"
    }
   
    # Browse sites
    $WebSrv = [microsoft.sharepoint.administration.spwebservice]::ContentService
    foreach ($webApp in $WebSrv.WebApplications)
    {
        foreach ($AltUrl in $webapp.AlternateUrls)
        {Add-UserPolicy $AltUrl.uri}
       
        foreach ($site in $WebApp.sites)
        {
            $rootweb = $site.RootWeb;
            foreach($web in $site.AllWebs)
            {
                foreach($MyList in $web.lists)
                {
                    if($ExceptionListnames -notcontains $MyList.Title)
                    {
                        $MyListIndexedColumns = ""
                        foreach($MySPField in $MyList.Fields)
                        {
                            if($MySPField.Indexed)
                            {
                                $ColumnTitleCleaned =  $MySPField.Title -replace $pattern, ''
                                $MyListIndexedColumns += $ColumnTitleCleaned +"["+ $MySPField.InternalName +"]; "
                            }
                        }

                        if($MyList.ItemCount -gt 5000)
                        {
                            $ColorToShow = "red"
                        }
                        else
                        {
                            $ColorToShow = "green"
                        }
                        If($displayMessages)
                        {
                            Write-Host " -------------------------------------------------- "
                            Write-Host "      List Name:", $MyList.Title, "- GUID:", $MyList.ID -foregroundcolor $ColorToShow
                            Write-Host "      >>SPWebURL URL:", $web.Url -foregroundcolor $ColorToShow
                            Write-Host "      >>Items Count:", $MyList.ItemCount -foregroundcolor $ColorToShow
                            Write-Host "      >>Created Date:", $MyList.Created -foregroundcolor $ColorToShow
                            Write-Host "      >>Last modified Date:", $MyList.LastItemModifiedDate -foregroundcolor $ColorToShow
                            Write-Host "      >>List Indexed Columns:", $MyListIndexedColumns -foregroundcolor $ColorToShow
                        }
                        # Build structure
                        $siteInfos = $itemStructure | Select-Object *;

                        $siteInfos.FarmType = $FarmType;
                        $siteInfos.SPWebAppURL = $web.Url.Split("/")[2];
                        $siteInfos.SPSiteCollURL = $site.URL;
                        $siteInfos.SPWebURL =  $web.Url;

                        $siteInfos.ListTitle = $MyList.Title;
                        $siteInfos.ListGUID = $MyList.ID;
                        $siteInfos.ListCreated = $MyList.Created.ToString('d');
                        $siteInfos.ListLastModifiedDate = $MyList.LastItemModifiedDate.ToString('d');
                        $siteInfos.ListDefaultViewURL = $MyList.DefaultViewUrl;
                        $siteInfos.ListTemplate = $MyList.BaseTemplate;
                        $siteInfos.ListItemsNumber = $MyList.ItemCount;
                        $siteInfos.ListIndexedColumns = $MyListIndexedColumns;
                       
                        $sitesList += $siteInfos;
                    }
                }
            }
        }
        $rootweb.Dispose()

    }
   
    # CSV Export
    If($displayMessages)
    {
        Write-Host -ForegroundColor Green "---------------"
        Write-Host -ForegroundColor Green " - CSV Export -"
        Write-Host -ForegroundColor Green "---------------"
    }
    $sitesList | Where-Object {$_} | Export-Csv -Delimiter "$delimiter" -Path $CSVFileName -notype
     If($displayMessages)
    {Write-Host "Export file $CSVFileName successfully generated."}
 
    # Export File To DBServer
    Copy-Item $CSVFileName $FolderToPutCSVName
   
    # Email notification
    If($SMTPServer)
    {SendEmail $CSVFileName}
   
    # End
    If($displayMessages)
    {
        Write-Host -ForegroundColor Green "---------------------------------"
        Write-Host -ForegroundColor Green "- Script started : $DateStarted -"
        Write-Host -ForegroundColor Green "- Script finished : $(Get-date) -"
        Write-Host -ForegroundColor Green "---------------------------------"
    }
    Exit
}

Ce script est planifié sur toutes mes fermes afin de remonter ces CSV dans une base SQL Server qui permet ensuite de tirer des informations vitales, comme les liste ayant plus de 5’000 mais surtout plus de 20’000 items afin de placer les indexes correctement avant import. En effet, au dessus de 20’000 items il est impossible de changer la structure d’une liste SharePoint Online.

Fabrice Romelard [MBA Risk Management]

Ce post vous a plu ? Ajoutez le dans vos favoris pour ne pas perdre de temps à le retrouver le jour où vous en aurez besoin :
Posted: mardi 28 mars 2017 17:53 par ROMELARD Fabrice

Commentaires

Pas de commentaires

Les commentaires anonymes sont désactivés

Les 10 derniers blogs postés

- Retrouvez-moi aux Microsoft experiences18 ! par Blog de Jérémy Jeanson le 11-06-2018, 22:25

- Office 365: Script PowerShell pour extraire les Teams associés à un utilisateur spécifié par Blog Technique de Romelard Fabrice le 11-06-2018, 13:37

- SharePoint: Extraire les pages publiées dans un site de publishing en CSV par Blog Technique de Romelard Fabrice le 11-06-2018, 11:04

- Office 365: Comment créer un jeu de Pages Modernes dans un Modern Site SharePoint Online en utilisant PowerShell depuis un fichier CSV par Blog Technique de Romelard Fabrice le 10-17-2018, 12:50

- Office 365: Comment Utiliser les Modern Pages dans un Site Intranet SharePoint basé sur le Publishing site par Blog Technique de Romelard Fabrice le 10-16-2018, 15:34

- Office 365: Comment changer le nom “Auteur” dans les pages modernes d'un Modern Site SharePoint Online par Blog Technique de Romelard Fabrice le 10-16-2018, 15:07

- Reprise des articles Codes-Sources de 2011 à 2013 par Blog de Jérémy Jeanson le 08-21-2018, 16:08

- Office 365: Modifier les jeux de couleur dans les Thèmes des pages classiques de SharePoint Online par Blog Technique de Romelard Fabrice le 08-08-2018, 17:27

- Office 365: Modifier les jeux de couleur dans les Thèmes des pages modernes de SharePoint Online par Blog Technique de Romelard Fabrice le 07-04-2018, 13:26

- Office 365: Script PowerShell pour fixer le Quota Warning de toutes les collections d’un tenant par Blog Technique de Romelard Fabrice le 07-03-2018, 14:16