Use WMI to get your processor speed and make.
PC and server systems in an enterprise network benefit from well-instrumented computer software and hardware, which allow system components to be monitored and controlled, both locally and remotely. Microsoft has provided for this with the WMI = Windows Management Instrumentation (formerly known as WBEM Web-based Enterprise management)
The WMI infrastructure ships in Windows 98 (although I could not get the routines to fire in win98 ??), Microsoft Windows NT® 4.0 SP4, Windows 2000, and Windows XP. It also is supported on Windows 95. It runs as the "Windows Management" Service.
Option Explicit
Sub ProcessorSpeed()
Dim objWMI As Object
Dim Cpu As Object
Set objWMI = GetObject("WinMgmts:").instancesOf("Win32_Processor")
'// Don't forget the computer maybe multiprocessor!
For Each Cpu In objWMI
MsgBox Cpu.Name & " " & Cpu.CurrentClockSpeed & " Mhz", _
vbInformation
Next
Set objWMI = Nothing
End Sub
![Goto Guest book sign in page [Home]](files/guestbook.gif)
