Попытка
Locator = Новый COMОбъект("WbemScripting.SWbemLocator");
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
ServicesSet = Locator.ConnectServer(ТекIP, "root\cimv2",Пользователь, Пароль);
//Здесь я получаю все свойства процессора, а мне нужно только "LoadPersentage"
ObjectSet = ServicesSet.InstancesOf("Win32_Processor");
       Для каждого Item Из ObjectSet Цикл
           Сообщить(Символы.ПС);
           // Выборка по всем свойствам
           Для каждого Свойство Из Item.Properties_ Цикл
               Сообщить(Свойство.Name + " = " + Свойство.Value);
           КонецЦикла;
       КонецЦикла;

+(1) тоесть из всего многообразия свойств мне нужно "ЗагрузкаПроцессора"

(0)
а запросом?


ObjectSet = ServicesSet.ExecQuery("Select LoadPersentage From Win32_Processor");

(2)+

так точно работает:

Set Locator = CreateObject("WbemScripting.SWbemLocator")
set ServicesSet = Locator.ConnectServer(".")
set ObjectSet = ServicesSet.ExecQuery("Select LoadPercentage From Win32_Processor")
for each Item in ObjectSet
   for each prop in Item.Properties_
               WScript.Echo prop.Name & " = " & prop.Value
   next
next

(2,3) ща проверю

(2) При таком коде вылазит еще одно лишнее свойство Name со значением Microsoft Windows XP Professional|C:\WINDOWS|\Device\Harddisk0\Partition1 - какого художника ?????
Items = ServicesSet.ExecQuery("Select FreePhysicalMemory from Win32_OperatingSystem");
       
       Для Каждого Item Из Items Цикл
                       
           Для Каждого Свойство Из Item.Properties_ Цикл
               
               //Если Строка(Свойство.Name) = "FreePhysicalMemory" Тогда
                   //ЧислоСвОперПамять = Формат(Число(Свойство.Value),"ЧРГ = '' ");
                   Сообщить("Имя свойства : "+Свойство.Name + "Значение : "+Свойство.Value);
               //    Прервать;
               //КонецЕсли;
           КонецЦикла;
           
       КонецЦикла;

Выдает загрузку на каждом процессоре в процентах если их несколько :
ObjectSet = ServicesSet.ExecQuery("Select LoadPercentage from Win32_Processor");
       Для каждого Item Из ObjectSet Цикл
           
               Для каждого Свойство Из Item.Properties_ Цикл
               Сообщить(Свойство.Name + " = " + Свойство.Value);
               КонецЦикла;
       КонецЦикла;