Objek SWbemPropertySet

Objek SWbemPropertySet adalah kumpulan objek SWbemProperty . Anda dapat menambahkan item ke koleksi menggunakan metode Tambahkan , mengambil item dari koleksi menggunakan metode Item , dan menghapus item dari koleksi menggunakan metode Hapus . Untuk informasi selengkapnya, lihat Mengakses Koleksi. Objek ini tidak dapat dibuat oleh panggilan VBScript CreateObject .

Objek SWbemProperty yang membentuk koleksi SWbemPropertySet digunakan untuk menjelaskan properti dari satu kelas atau instans WMI.

Anggota

Objek SWbemPropertySet memiliki jenis anggota ini:

• Metode
• Properti

Metode

Objek SWbemPropertySet memiliki metode ini.

Metode	Deskripsi
Menambahkan	Menambahkan objek SWbemProperty ke koleksi SWbemPropertySet .
Item	Mendapatkan SWbemProperty bernama dari koleksi. Ini adalah metode default untuk objek ini.
Hapus	Menghapus objek SWbemProperty dari koleksi.

Properti

Objek SWbemPropertySet memiliki properti ini.

Properti	Jenis akses	Deskripsi
Menghitung	Baca-saja	Jumlah item dalam koleksi SWbemPropertySet .

Contoh

Sampel VBScript berikut menunjukkan bagaimana SWbemPropertySet.Remove dapat mengembalikan wbemErrResetToDefault jika properti ditimpa.

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

Persyaratan

Persyaratan	Nilai
Klien minimum yang didukung	Windows Vista
Server minimum yang didukung	Windows Server 2008
Header	Wbemdisp.h
Pustaka jenis	Wbemdisp.tlb
DLL	Wbemdisp.dll
CLSID	CLSID_SWbemPropertySet
IID	IID_ISWbemPropertySet

Lihat juga

Membuat Skrip Objek API