Код VB для проверки Центра обновления Windows говорит, что сервер недоступен

Question

Я написал инструмент для проверки обновлений Windows на нескольких серверах или клиентах, и на некоторых серверах все в порядке, но на некоторых он дает мне System.Exeption:

The remote server machine does not exist or is unavailable.
  at Microsoft.VisualBasic.Interaction.CreateObject(String ProgId, String ServerName)
  at MJ_Update_Manager.MJUM_Form.Update_Checker_Background()

Кто-нибудь может мне помочь? Чего-то не хватает на сервере?

Dim updateSession = CreateObject("Microsoft.Update.Session", TMPServer) ' here is the exeption/problem

Dim updateSearcher = updateSession.CreateupdateSearcher()
Dim searchResult = updateSearcher.Search("IsInstalled=0 and Type='Software'")