473,473 Members | 1,814 Online
Bytes | Software Development & Data Engineering Community
Create Post

Home Posts Topics Members FAQ

CPU Speed

Is there a way to get the CPU speed (in Mhz) without using WMI? I need to
include this functionality in a program that have to work also in Windows 98
and I don't want to distributeWMI apart.
Nov 20 '05 #1
8 875
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to
include this functionality in a program that have to work also in Windows 98 and I don't want to distributeWMI apart.

Nov 20 '05 #2
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to
include this functionality in a program that have to work also in Windows 98 and I don't want to distributeWMI apart.

Nov 20 '05 #3
It's exactly what I do now, but unfortunately that key is not always present
in Windows 98
"Ken Tucker [MVP]" <vb***@bellsouth.net> ha scritto nel messaggio
news:eZ**************@TK2MSFTNGP11.phx.gbl...
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to include this functionality in a program that have to work also in
Windows 98
and I don't want to distributeWMI apart.



Nov 20 '05 #4
It's exactly what I do now, but unfortunately that key is not always present
in Windows 98
"Ken Tucker [MVP]" <vb***@bellsouth.net> ha scritto nel messaggio
news:eZ**************@TK2MSFTNGP11.phx.gbl...
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to include this functionality in a program that have to work also in
Windows 98
and I don't want to distributeWMI apart.



Nov 20 '05 #5
you could calculate it, im not sure of the exact algoritm, but if you count
how many loops you can do in a certain period of time you can determin the
frequency of the clock in the system

like in one second, how many for loops can you do at CPU process usaged 100%
take that divide it out, figure out the number of processes that occured
then something else and that equals your speed in MHz.. there is some
documents on calculating MHz speeds on google if you search for it.
"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
It's exactly what I do now, but unfortunately that key is not always present in Windows 98
"Ken Tucker [MVP]" <vb***@bellsouth.net> ha scritto nel messaggio
news:eZ**************@TK2MSFTNGP11.phx.gbl...
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to include this functionality in a program that have to work also in

Windows
98
and I don't want to distributeWMI apart.



Nov 20 '05 #6
you could calculate it, im not sure of the exact algoritm, but if you count
how many loops you can do in a certain period of time you can determin the
frequency of the clock in the system

like in one second, how many for loops can you do at CPU process usaged 100%
take that divide it out, figure out the number of processes that occured
then something else and that equals your speed in MHz.. there is some
documents on calculating MHz speeds on google if you search for it.
"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
It's exactly what I do now, but unfortunately that key is not always present in Windows 98
"Ken Tucker [MVP]" <vb***@bellsouth.net> ha scritto nel messaggio
news:eZ**************@TK2MSFTNGP11.phx.gbl...
Hi,

It is in the registry

Dim myReg As RegistryKey = Registry.LocalMachine

Dim MyRegKey As RegistryKey

Dim MyVal As String

MyRegKey =
myReg.OpenSubKey("HARDWARE\DESCRIPTION\SYSTEM\Cent ralProcessor\0")

MyVal = MyRegKey.GetValue("~Mhz")

MyRegKey.Close()

txtRegistry.Text = String.Format("CPU Speed {0}", MyVal)

Ken

--------------------

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
Is there a way to get the CPU speed (in Mhz) without using WMI? I need to include this functionality in a program that have to work also in

Windows
98
and I don't want to distributeWMI apart.



Nov 20 '05 #7
here is a small assembler snippit I used a few years ago. I don't know how to
compile it in VS, but it should be possible to compile this in C++ as a dll and then
call the dll from VB.NET.

JackRazz

..586p
..Model Flat ,StdCall
UNICODE=0
Extrn _wsprintfA : near
include w32.inc

..data

capt db 'CPU Test',0
format db 'CPU Speed = %lu Mhz',0
buffer db 30 dup (0)

..code

main:
xor eax,eax
rdtsc
mov ebx,eax
call Sleep, 1000
rdtsc
sub eax,ebx
sub eax,8
xor edx,edx
mov ecx,1000000
div ecx
call _wsprintfA, offset buffer, offset format, eax
call MessageBoxA, 0 ,offset buffer, offset capt, 0
call ExitProcess , 0

end main

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
| Is there a way to get the CPU speed (in Mhz) without using WMI? I need to
| include this functionality in a program that have to work also in Windows 98
| and I don't want to distributeWMI apart.
|
|
Nov 20 '05 #8
here is a small assembler snippit I used a few years ago. I don't know how to
compile it in VS, but it should be possible to compile this in C++ as a dll and then
call the dll from VB.NET.

JackRazz

..586p
..Model Flat ,StdCall
UNICODE=0
Extrn _wsprintfA : near
include w32.inc

..data

capt db 'CPU Test',0
format db 'CPU Speed = %lu Mhz',0
buffer db 30 dup (0)

..code

main:
xor eax,eax
rdtsc
mov ebx,eax
call Sleep, 1000
rdtsc
sub eax,ebx
sub eax,8
xor edx,edx
mov ecx,1000000
div ecx
call _wsprintfA, offset buffer, offset format, eax
call MessageBoxA, 0 ,offset buffer, offset capt, 0
call ExitProcess , 0

end main

"Claudio Di Flumeri" <cl***********@mtgc.net> wrote in message
news:c4*************@ID-198343.news.uni-berlin.de...
| Is there a way to get the CPU speed (in Mhz) without using WMI? I need to
| include this functionality in a program that have to work also in Windows 98
| and I don't want to distributeWMI apart.
|
|
Nov 20 '05 #9

This thread has been closed and replies have been disabled. Please start a new discussion.

Similar topics

13
by: Yang Li Ke | last post by:
Hi guys, Is it possible to know the internet speed of the visitors with php? Thanx -- Yang
8
by: Rob Ristroph | last post by:
I have tried out PHP 5 for the first time (with assistance from this group -- thanks!). The people I was working with have a site that uses lots of php objects. They are having problems with...
34
by: Jacek Generowicz | last post by:
I have a program in which I make very good use of a memoizer: def memoize(callable): cache = {} def proxy(*args): try: return cache except KeyError: return cache.setdefault(args,...
28
by: Maboroshi | last post by:
Hi I am fairly new to programming but not as such that I am a total beginner From what I understand C and C++ are faster languages than Python. Is this because of Pythons ability to operate on...
52
by: Neuruss | last post by:
It seems there are quite a few projects aimed to improve Python's speed and, therefore, eliminate its main limitation for mainstream acceptance. I just wonder what do you all think? Will Python...
7
by: YAZ | last post by:
Hello, I have a dll which do some number crunching. Performances (execution speed) are very important in my application. I use VC6 to compile the DLL. A friend of mine told me that in Visual...
6
by: Ham | last post by:
Yeah, Gotto work with my VB.Net graphic application for days, do any possible type of code optimization, check for unhandled errors and finally come up with sth that can't process 2D graphics and...
6
by: Jassim Rahma | last post by:
I want to detect the internet speed using C# to show the user on what speed he's connecting to internet?
11
by: kyosohma | last post by:
Hi, We use a script here at work that runs whenever someone logs into their machine that logs various bits of information to a database. One of those bits is the CPU's model and speed. While...
4
by: nestle | last post by:
I have DSL with a download speed of 32MB/s and an upload speed of 8MB/s(according to my ISP), and I am using a router. My upload speed is always between 8MB/s and 9MB/s(which is above the max upload...
0
by: Hystou | last post by:
Most computers default to English, but sometimes we require a different language, especially when relocating. Forgot to request a specific language before your computer shipped? No problem! You can...
0
jinu1996
by: jinu1996 | last post by:
In today's digital age, having a compelling online presence is paramount for businesses aiming to thrive in a competitive landscape. At the heart of this digital strategy lies an intricately woven...
0
tracyyun
by: tracyyun | last post by:
Dear forum friends, With the development of smart home technology, a variety of wireless communication protocols have appeared on the market, such as Zigbee, Z-Wave, Wi-Fi, Bluetooth, etc. Each...
0
agi2029
by: agi2029 | last post by:
Let's talk about the concept of autonomous AI software engineers and no-code agents. These AIs are designed to manage the entire lifecycle of a software development project—planning, coding, testing,...
1
isladogs
by: isladogs | last post by:
The next Access Europe User Group meeting will be on Wednesday 1 May 2024 starting at 18:00 UK time (6PM UTC+1) and finishing by 19:30 (7.30PM). In this session, we are pleased to welcome a new...
0
by: TSSRALBI | last post by:
Hello I'm a network technician in training and I need your help. I am currently learning how to create and manage the different types of VPNs and I have a question about LAN-to-LAN VPNs. The...
0
by: adsilva | last post by:
A Windows Forms form does not have the event Unload, like VB6. What one acts like?
1
muto222
php
by: muto222 | last post by:
How can i add a mobile payment intergratation into php mysql website.
0
bsmnconsultancy
by: bsmnconsultancy | last post by:
In today's digital era, a well-designed website is crucial for businesses looking to succeed. Whether you're a small business owner or a large corporation in Toronto, having a strong online presence...

By using Bytes.com and it's services, you agree to our Privacy Policy and Terms of Use.

To disable or enable advertisements and analytics tracking please visit the manage ads & tracking page.