问有没有办法一次编辑多个SharePoint 2013页面的超文本标记语言？

EN

function ProcessWeb($currentWeb)
{
    if([Microsoft.SharePoint.Publishing.PublishingWeb]::IsPublishingWeb($currentWeb))
    {            
        $publishingWeb = [Microsoft.SharePoint.Publishing.PublishingWeb]::GetPublishingWeb($currentWeb)
        $publishingPages = $publishingWeb.GetPublishingPages()
        foreach ($publishingPage in $publishingPages)
        {
            if($publishingPage.ListItem.File.CheckOutStatus -eq "None")
            {
                UpdatePage -page $publishingPage
            }
        }    
        Write-Host -ForegroundColor red "FINISHED"
    }
    else
    {
        Write-Host -Foregroundcolor Red "^ not a publishing site" 
    }
}

function UpdatePage($page)
{
    $page.CheckOut();
    Write-Host -Foregroundcolor green $page.Url;        
    $NewPageContent = $page["PublishingPageContent"].Replace("/place1/place2/link","/place3/place4/link");
    $page["PublishingPageContent"] = $NewPageContent    
    $page.ListItem.Update();
    $page.CheckIn("nothing");
    $page.ListItem.File.Approve("Updated PublishingPageContent to replate place1/place2 with place3/place4");
}

ProcessWeb(Get-SPWeb -identity http://myintranet.com)