windows-server-2003/admin/wmi/wbem/scripting/test/vbscript/stress/derivation.vbs

on Error resume next

while true
Set c = GetObject("winmgmts://./root/cimv2:win32_logicaldisk")
d = c.Derivation_

for x = LBound(d) to UBound(d)
	WScript.Echo d(x)
Next

if err <> 0 then
	WScript.Echo Err.Description
end if

wend