Объект SWbemPropertySet

Объект SWbemPropertySet — это коллекция объектов SWbemProperty . Вы можете добавлять элементы в коллекцию с помощью метода Add , извлекать элементы из коллекции с помощью метода Item и удалять элементы из коллекции с помощью метода Remove . Дополнительные сведения см. в разделе Доступ к коллекции. Этот объект не может быть создан вызовом VBScript CreateObject .

Объекты SWbemProperty , составляющие коллекцию SWbemPropertySet , используются для описания свойств одного класса или экземпляра WMI.

Элементы

Объект SWbemPropertySet имеет следующие типы элементов:

• Методы
• Свойства

Методы

Объект SWbemPropertySet содержит следующие методы.

Свойства

Объект SWbemPropertySet имеет следующие свойства.

Примеры

В следующем примере VBScript показано, как SWbemPropertySet.Remove может возвращать wbemErrResetToDefault , если свойство переопределено.

on error resume next 

'Create a keyed class with a defaulted property
set service = GetObject("Winmgmts:")
set emptyclass = service.Get
emptyclass.path_.class = "REMOVETEST00"
set prop = emptyclass.properties_.add ("p", 19)

prop.qualifiers_.add "key", true
emptyclass.properties_.add ("q", 19).Value = 12

emptyclass.put_

'create an instance and override the property
set instance = service.get ("RemoveTest00").spawninstance_

instance.properties_("q").Value = 24
instance.properties_("p").Value = 1
instance.put_

'retrieve the instance and remove the property
set instance = service.get ("removetest00=1")
set property = instance.properties_ ("q")

WScript.echo "Overridden value of property is [24]:", property.value
WScript.echo ""

instance.properties_.remove "q"
set property = instance.properties_ ("q")
WScript.echo "Value of property after removal is [12]:", property.value
WScript.echo ""

if err <> 0 then
 WScript.Echo "0x" & Hex(Err.Number), Err.Description, Err.Source
end if

Требования

См. также раздел

Объекты API для создания скриптов