Cu Windows Management Instrumentation (WMI). Este preinstalat pe Windows Me, Windows XP, Windows 2000 si Windows 2003 Server. Pe Windows 98/95 nu exista, trebuie instalat (il gasesti cu un search la www.microsoft.com/downloads).

Codul aferent este urmatorul:

local loWMIService, loCPUs, loCPU

loWMIService	= GetObject("winmgmts:\\.\root\cimv2")
loCPUs		= loWMIService.ExecQuery("Select * from Win32_Processor")

For Each loCPU in loCPUs
	With loCPU
		? 'CPU Id		', .ProcessorID
		? 'Name			', .Name
		? 'AddressWidth		', .AddressWidth
		? 'Architecture		', .Architecture
		? 'Caption		', .Caption
		? 'CurrentClockSpeed	', .CurrentClockSpeed
		? 'DataWidth		', .DataWidth
		? 'ExtClock		', .ExtClock
		? 'Family		', .Family
		? 'Version		', .Version
		? 'UpgradeMethod	', .UpgradeMethod
   EndWith 
EndFor

Pe sistemul meu, codul de mai sus returneaza:

CPU Id: 0383FBFF000006A0
Name: AMD Athlon(TM) XP 2800+
AddressWidth: 32
Architecture: 0
Caption: x86 Family 6 Model 10 Stepping 0
CurrentClockSpeed: 2083
DataWidth: 32
ExtClock: 166
Family: 28
Version: Model 10, Stepping 0
UpgradeMethod: 1