2010-07-16 20:49

/* Returns boot configuration information for a computer */
strcomputer = "."
objwmiservice = getobject("winmgmts:{impersonationLevel=impersonate}!\\" || strcomputer || "\root\cimv2")
colitems = objwmiservice~execquery("Select * from Win32_BootConfiguration")
DO objitem OVER colitems
	SAY "Boot Directory:" objitem~bootdirectory
	SAY "Configuration Path:" objitem~configurationpath
	SAY "Description:" objitem~description
	SAY "Last Drive:" objitem~lastdrive
	SAY "Name:" objitem~name
	SAY "Scratch Directory:" objitem~scratchdirectory
	SAY "Setting ID:" objitem~settingid
	SAY "Temp Directory:" objitem~tempdirectory
END

2010-07-16 20:49