objwmiservice = getobject("winmgmts:\\.\root\CIMV2")
colositems = objwmiservice~execquery("SELECT * FROM Win32_OperatingSystem")
DO objositem OVER colositems
SAY "Boot Device:" objositem~bootdevice
SAY "System Device:" objositem~systemdevice
SAY "System Drive:" objositem~systemdrive
SAY "Windows Directory:" objositem~windowsdirectory
SAY "System Directory:" objositem~systemdirectory
END |