LISTING 2: Combining the Two Statements in Listing 1
NONEXECUTABLE

Set wmiObjectSet = GetObject("winmgmts:").InstancesOf("Win32_LogicalDisk")