While you can perform a Visual Upgrade on a SharePoint 2007 site after importing it into SharePoint 2010, what if you want to change it back?
The SharePoint 2007/2010 visual style is determined by the site's UIVersion property. A value of 3 dictates a 2007 look and feel, while a value of 4 dictates a 2010 appearance.
We can use PowerShell to change the UIVersion at will. The following script will recursively upgrade or downgrade a site's visual style.
|
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 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 |
# Title Set-SPWebUIVersion # Version 1.1 25JAN12 # Author James Sanders # Purpose Perform a Visual Upgrade/Downgrade of SharePoint 2010 web site and subsites Param([string]$URL, [string]$Style) # Internal script functions Function ShowHelp() { $HelpText =@" SP2010SiteStyle Perform a "Visual Upgrade/Downgrade" of SharePoint 2010 web site PARAMETERS -url [REQUIRED] URL of site to change -style [REQUIRED] (2007|2010) Which UI version to apply EXAMPLES Changes site to 2007 style Set-SPWebUIVersion.ps1 -url http://web_to_change -style 2007 Changes site to 2010 style Set-SPWebUIVersion.ps1 -url http://web_to_change -style 2010 "@ $HelpText } # Enumerate SharePoint web site to include all subwebs Function EnumerateWebs ([Microsoft.SharePoint.SPWeb]$Web, [array]$Webs) { If ($Web.Webs.Count -gt 0) { $Webs = $Webs + $Web.Url ForEach ($SubWeb In $Web.Webs) { EnumerateWebs $SubWeb } } Else { $Webs = $Webs + $Web.Url } Return $Webs } # Show help and exit if no URL specified If (!$URL -Or !$Style) {ShowHelp; Exit} Switch ($Style) { "2007" {$VisualStyle = 3} "2010" {$VisualStyle = 4} Default {ShowHelp; Exit} } "`nSet-SPWebUIVersion`n" # Load SharePoint Snap-In "- Loading SharePoint PowerShell snap-in" Add-PSSnapin Microsoft.SharePoint.PowerShell -ErrorAction SilentlyContinue # Retrieve SharePoint Site $Web = Get-SPWeb($URL) -ErrorAction SilentlyContinue If (!$Web) { "`nERROR: Unable to open web site $URL" Exit } # Retrieve subsites $Webs = EnumerateWebs $Web|Sort-Object $Web.Dispose() # Display site info "`nDETAILS" "Web Site: $URL" "Sub Sites: $($Webs.Count)`n" "Applying $Style style ...`n" $Webs = $Webs|Sort-Object -Descending ForEach ($WebURL In $Webs) { "- Reconfiguring $WebURL" $Web = Get-SPWeb $WebURL $Web.UIVersion = $VisualStyle $Web.Update() $Web.Dispose() } "`nDone!`n" |
