$strComputer = "."
$sQuery = "select * From Win32_processor"
$objWMIService=GetObject('winmgmts:{impersonationlevel=impersonate}\\'+$strcomputer+'\root\cimv2')
$arrProcessors = $objWMiService.ExecQuery( $sQuery, , 16 )
for each $processor in $arrProcessors
"name : " $processor.name ?
"Architecture : " $processor.AddressWidth " bits" ?
"current freq : " $processor.CurrentClockSpeed " MHz" ?
"maximum freq : " $processor.MaxClockSpeed " MHz" ?
"nb of cores : " $processor.NumberOfCores ?
"actives cores : " $processor.NumberOfEnabledCore ?
"logical cores : " $processor.NumberOfLogicalProcessors
if ($processor.NumberOfEnabledCore <> $processor.NumberOfLogicalProcessors)
" (hyper-threading activated)" ?
else
?
endif
next