Загадочная ошибка при присоединении к клиенту WMI

[xgmann Профиль]

Народ, кто-нибудь может знает или слышал о тех кто знает.
Проблема в следующем.
Есть скрипт запускающий назначенное задание на удалённых хостах, задание - это самораспаковывающийся пакет, затем перезагрузка.
Всё работает, но временами, т. к. иногда получаю великолепное сообщение:
Permission denied: 'GetObject'
Code: 800A0046
Source: Microsoft VBScript runtime error


Всеми правами я обладаю как доменный администратор.

Скрипт:
Set fso = WScript.CreateObject("Scripting.FileSystemObject")
Dim Computer(2)
Computer(0) = "host1"
Computer(1) = "host2"
Computer(2) = "host3"
For i = 0 To 2
Set objWMIService = GetObject("winmgmts:\\" & Computer(i) & "\root\CIMV2")
fso.CopyFile "I:\IsHostReachable.vbs", "\\" & Computer(i) & "\c$\"
Set objScheduledJob = objWMIService.Get("Win32_ScheduledJob")
Set objSWbemDateTime = CreateObject("WbemScripting.SWbemDateTime")
objSWbemDateTime.SetVarDate(DateAdd("n", 1, Now()))
Res = objScheduledJob.Create("wscript.exe c:\IsHostReachable.vbs", objSWbemDateTime.Value, False, 0, 0, True, intJobID)
'Next