Mike,

It requires WMI not WSH.

>The following requires Windows Scripting to be installed.
>

Clear
>On Error *
>lcComputer = "."
>loWMIService = Getobject("winmgmts:\\" + lcComputer + "\root\cimv2")
>colItems = loWMIService.ExecQuery("Select * from Win32_Processor")
>For Each loItem In colItems
>	?"Address Width: " + Transform(loItem.AddressWidth)
>	?"Architecture: " + Transform(loItem.Architecture)
>	?"Availability: " + Transform(loItem.Availability)
>	?"CPU Status: " + Transform(loItem.CpuStatus)
>	?"Current Clock Speed: " + Transform(loItem.CurrentClockSpeed)
>	?"Data Width: " + Transf(loItem.DataWidth)
>	?"Description: " + loItem.Description
>	?"Device ID: " + loItem.DeviceID
>	?"Ext Clock: " + Transform(loItem.ExtClock)
>	?"Family: " + Transform(loItem.Family)
>	?"L2 Cache Size: " + Transform(loItem.L2CacheSize)
>	?"L2 Cache Speed: " + Transform(loItem.L2CacheSpeed)
>	?"Level: " + Transform(loItem.Level)
>	?"Load Percentage: " + Transform(loItem.LoadPercentage)
>	?"Manufacturer: " + loItem.Manufacturer
>	?"Maximum Clock Speed: " + Transform(loItem.MaxClockSpeed)
>	?"Name: " + loItem.Name
>	?"PNP Device ID: " + loItem.PNPDeviceID
>	?"Processor Id: " + loItem.ProcessorId
>	?"Processor Type: " + Transform(loItem.ProcessorType)
>	?"Revision: " + Transform(loItem.Revision)
>	?"Role: " + loItem.Role
>	?"Socket Designation: " + loItem.SocketDesignation
>	?"Status Information: " + Transform(loItem.StatusInfo)
>	?"Stepping: " + loItem.Stepping
>	?"Unique Id: " + loItem.UniqueId
>	?"Upgrade Method: " + Transf(loItem.UpgradeMethod)
>	?"Version: " + loItem.Version
>	?"Voltage Caps: " + Transform(loItem.VoltageCaps)
>Next

>