Исправление: Сообщение об ошибке при использовании задачи New-MoveRequest для перемещения почтового ящика в Exchange 2007 до Exchange 2010: «ошибка: MapiExceptionNetworkError: не удалось установить подключение к серверу. (hr = 0x80040115 ec = 2147221227)»

Сведения об установке исправления

Чтобы устранить эту проблему, выполните следующие действия:

1. Установите накопительный пакет исправлений, описанный в следующей статье базы знаний Майкрософт:
   

   976301 Описание пакета исправлений для ISA Server 2006: 25 октября 2009 г.
   
   

2. Запустите программу «Блокнот» и скопируйте следующий сценарий в файл блокнота.

       Dim oFPC    Dim oFirewallFilter
       Dim oVPS
   
       on error resume next
   
       err.Clear
   
       Set oFPC = CreateObject("FPC.Root")
   
       'Get the filter admin object
       Set oFirewallFilter = oFPC.GetContainingArray.Extensions.ApplicationFilters("{E331F638-AB86-4AA5-9B6A-2B0248C7B4FB}")
       if oFirewallFilter is nothing then
   Wscript.Echo "RPC filter ({E331F638-AB86-4AA5-9B6A-2B0248C7B4FB}) is not installed in array"
   WScript.Quit
       end if
   
       'Get the filters vendor parameters set object
       Set oVPS = oFirewallFilter.VendorParametersSets("{E331F638-AB86-4AA5-9B6A-2B0248C7B4FB}")
   
       'If this vendor parameters set does not exists, create it
       If oVPS Is Nothing Then
   WScript.Echo "Adding vendor parameters set ({E331F638-AB86-4AA5-9B6A-2B0248C7B4FB})"
   err.Clear
           Set oVPS = oFirewallFilter.VendorParametersSets.Add("{E331F638-AB86-4AA5-9B6A-2B0248C7B4FB}",False)
           oFirewallFilter.VendorParametersSets.Save
       End If
   
       'Add the needed parameters
   
       oVPS.Value("ForwardNotRegisteredError") = 1
   
       oVPS.Save
   
       'Inform the user of the result
       if err.Number <>0 then
   Wscript.Echo "Fail to set parameters. error code is:" & err.number & " Desc:" & err.description
       else
           Wscript.Echo "Paramters were successfully added"
       end if
   
   

3. Сохраните файл как файл сценария Microsoft Visual Basic, используя расширение .vbs. Например сохраните файл, используя следующее имя:
   EnableKB976545.vbs

4. Дважды щелкните значок файла с расширением .vbs для его запуска.