Looking trough the Vista wmi stuff I found something that might be of some interest to some so generated this script:
 Code:
$strComputer = "."
$objWMIService = GetObject("winmgmts:\\" + $strComputer + "\root\cimv2")
$colItems = $objWMIService.ExecQuery("Select * from Win32_WinSAT",,48)
For Each $objItem in $colItems
  "CPUScore: " + $objItem.CPUScore ?
  "D3DScore: " + $objItem.D3DScore ?
  "DiskScore: " + $objItem.DiskScore ?
  "GraphicsScore: " + $objItem.GraphicsScore ?
  "MemoryScore: " + $objItem.MemoryScore ?
  "TimeTaken: " + $objItem.TimeTaken ?
  "WinSATAssessmentState: " + $objItem.WinSATAssessmentState ?
  "WinSPRLevel: " + $objItem.WinSPRLevel ?
  ?
Next


Information about the properties can be found here