2010-07-16 20:49

/* Displays the results (failed, succeeded, interrupted) of the last system restore performed on a computer */
strcomputer = "."
objwmiservice = getobject("winmgmts:{impersonationLevel=impersonate}!\\" || strcomputer || "\root\default")
objitem = objwmiservice~get("SystemRestore")
errresults = objitem~getlastrestorestatus()
SELECT errresults
	WHEN 0 THEN strrestorestatus = "The last restore failed."
	WHEN 1 THEN strrestorestatus = "The last restore was successful."
	WHEN 2 THEN strrestorestatus = "The last restore was interrupted."
	OTHERWISE strrestorestatus = "Unknown"
END
SAY strrestorestatus

2010-07-16 20:49