Share via


SWbemRefreshableItem, objet

L’objet SWbemRefreshableItem représente un élément unique dans un objet SWbemRefresher. Un objet SWbemRefreshableItem est obtenu via les méthodes Add et AddEnum de SWbemRefresher. Cet objet ne peut pas être créé par l’appel VBScript CreateObject.

Membres

L’objet SWbemRefreshableItem a ces types de membres :

Méthodes

L’objet SWbemRefreshableItem a les méthodes suivantes.

Méthode Description
Remove Supprime l’objet SWbemRefreshableItem de l’objet SWbemRefresher parent.

Propriétés

L’objet SWbemRefreshableItem a les propriétés suivantes.

Propriété Type d’accès Description
Index
Lecture/écriture
Index de l’élément dans son objet SWbemRefresher parent.
IsSet
Lecture/écriture
Indique si l’objet SWbemRefreshableItem représente un objet unique ou un ensemble d’objets.
Object
Lecture/écriture
Représente un objet SWbemObject unique qui est actualisé.
ObjectSet
Lecture/écriture
Représente l’ensemble d’objets à actualiser.
Actualisation
Lecture seule
Représente l’objet SWbemRefresher parent qui contient l’objet SWbemRefreshableItem.

Notes

La méthode VBScript GetObject ne peut pas être utilisée pour créer des objets SWbemRefreshableItem directement.

Exemples

Le script suivant illustre la création d’un objet SWbemRefresher et l’ajout d’un objet unique et d’un énumérateur SWbemRefreshableItem.

' 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

Spécifications

Condition requise Valeur
Client minimal pris en charge
Windows Vista
Serveur minimal pris en charge
Windows Server 2008
En-tête
Wbemdisp.h
Bibliothèque de types
Wbemdisp.tlb
DLL
Wbemdisp.dll
CLSID
CLSID_SWbemRefreshableItem
IID
IID_ISWbemRefreshableItem

Voir aussi

Objets de l’API de script