2010-07-16 20:49

/* Returns a list of settings that indicate the action to be taken by a computer should a stop event (blue screen) occur */
strcomputer = "."
objwmiservice = getobject("winmgmts:{impersonationLevel=impersonate}!\\" || strcomputer || "\root\cimv2")
colrecoveryoptions = objwmiservice~execquery("Select * from Win32_OSRecoveryConfiguration")
DO objoption OVER colrecoveryoptions 
	SAY "Auto reboot:" objoption~autoreboot
	SAY "Debug File Path:" objoption~debugfilepath
	SAY "Debug Info Type:" objoption~debuginfotype
	SAY "Kernel Dump Only:" objoption~kerneldumponly
	SAY "Name:" objoption~name
	SAY "Overwrite Existing Debug File:" objoption~overwriteexistingdebugfile
	SAY "Send Administrative Alert:" objoption~sendadminalert
	SAY "Write Debug Information:" objoption~writedebuginfo
	SAY "Write to System Log:" objoption~writetosystemlog
END

2010-07-16 20:49