Objeto SWbemRefreshableItem
O objeto SWbemRefreshableItem representa um único item em um objeto SWbemRefresher. Um objeto SWbemRefreshableItem é obtido por meio dos métodos Adicionar e AddEnum de SWbemRefresher. Esse objeto não pode ser criado pela chamada CreateObject do VBScript.
Membros
O objeto SWbemRefreshableItem tem estes tipos de membros:
Métodos
O objeto SWbemRefreshableItem tem esses métodos.
Método | Descrição |
---|---|
Remover | Remove o objeto SWbemRefreshableItem do objeto SWbemRefresher pai. |
Propriedades
O objeto SWbemRefreshableItem tem essas propriedades.
Propriedade | Tipo de acesso | Descrição |
---|---|---|
Índice |
Leitura/gravação |
Índice do item em seu objeto SWbemRefresher pai. |
IsSet |
Leitura/gravação |
Indica se o objeto SWbemRefreshableItem representa um único objeto ou um conjunto de objetos. |
Object |
Leitura/gravação |
Representa um único objeto SWbemObject que é atualizado. |
ObjectSet |
Leitura/gravação |
Representa o conjunto de objetos a ser atualizado. |
Atualização |
Somente leitura |
Representa o objeto SWbemRefresher pai que contém o objeto SWbemRefreshableItem. |
Comentários
O método GetObject do VBScript não pode ser usado para criar objetos SWbemRefreshableItem diretamente.
Exemplos
O script a seguir ilustra a criação de um objeto SWbemRefresher e a adição de um único objeto e enumerador SWbemRefreshableItem a ele.
' Get some namespace connections
set cimv2 = GetObject("winmgmts:root\cimv2")
set default = GetObject("winmgmts:root\default")
' Create a refresher
set refresher = CreateObject("WbemScripting.SWbemRefresher")
' Add a single object to the refresher.
' The @ is used because this is a singleton
' system class so only one instance exists.
set item1 = refresher.Add (default, "__CIMOMIdentification=@").Object
MsgBox "WMI Version " item1
' Add an enumerator to the refresher.
' Note that the SWbemRefreshableItem.ObjectSet
' property must be used to designate
' this as an object set rather than a single object.
set item2 = refresher.AddEnum (cimv2, "Win32_Process").ObjectSet
' Loop three times, refreshing the items
For I= 1 To 3
MsgBox "Refresh number " & I
refresher.Refresh
' Iterate through the collection of
' processes in item2 with name of wscript
For each process in item2
If process.name = "wscript.exe" then
MsgBox "Process " & process.Name & _
" Page Faults " & process.PageFaults
End If
Next
Next
' Clear out the refresher
refresher.DeleteAll
' The following should return 0
MsgBox "Number of items in Refresher after DeleteAll " _
& refresher.Count
Requisitos
Requisito | Valor |
---|---|
Cliente mínimo com suporte |
Windows Vista |
Servidor mínimo com suporte |
Windows Server 2008 |
Cabeçalho |
|
Biblioteca de tipos |
|
DLL |
|
CLSID |
CLSID_SWbemRefreshableItem |
IID |
IID_ISWbemRefreshableItem |