Total Number of Handles 1

[tsdragon]

Does anyone know where the total number of handles that shows in the task manager on the performance tab comes from? Is there any way to get that number with VB? My boss needs this for a monitoring program he is working on. He says he has searched everywhere and can't find it. Help me show my boss that Tek-Tips really IS worth the time I spend on it!

Tracy Dryden

Meddle not in the affairs of dragons,
For you are crunchy, and good with mustard.

 

[ZmrAbdulla]

Have seen many task manager samples at

http://www.planet-source-code.com.

don't know any of them will help you.

________________________________________________________
Zameer Abdulla
Help to find Missing people
Do not cut down the tree that gives you shade.

 

[chiph]

They may be available via a WMI query, but I'm not an expert on the technology, so I'm not 100% sure.

Chip H.


____________________________________________________________________
Donate to Katrina relief:

http://s1.amazon.com/paypage/PELYGQVJ8Q7IB/103-6821258-5919825

If you want to get the best response to a question, please read FAQ222-2244 first

 

[ADoozer]

check out NtQuerySystemInformation

its something ive been looking into recently for a project im working on. it "should" do what you require.

http://msdn.microsoft.com/library/d...-us/sysinfo/base/ntquerysysteminformation.asp

SystemProcessInformation
Returns an array of SYSTEM_PROCESS_INFORMATION structures, one for each process running in the system.
These structures contain information about the resource usage of each process, including the number of handles used by the process, the peak page-file usage, and the number of memory pages that the process has allocated.

good luck

If somethings hard to do, its not worth doing - Homer Simpson

 

[strongm]

WMI is where I'd look as well; here's my first stab:

[blue]Public Function GetTaskManHandles() As Long
    Dim objItem As Object ' we'll lazily late bind
    For Each objItem In GetObject("winmgmts:\\.\root\cimv2").ExecQuery("Select * from Win32_PerfFormattedData_PerfProc_Process where Name='_Total'", , 48)
        GetTaskManHandles = objItem.HandleCount
    Next
End Function[/blue]

 

[tsdragon]

I'll tell him about the WMI code. We've already found out about NtQuerySystemInformation and he's been playing around with that.

strongm: Why are you setting the return value of the function inside of the for loop? Won't that just return the last value?

Tracy Dryden

Meddle not in the affairs of dragons,
For you are crunchy, and good with mustard.

 

[strongm]

Because it doesn't really matter. The 'Where' clause restricts the results to only one record, so we can set it in the loop or outside the loop. Makes no difference.

 

[tsdragon]

OIC. So the for clause is essentially just acting as an assignment statement?

strongm: My boss wants to know if you want a job (if you say yes I'm in big trouble). He just ran your code and it works perfectly! He is VERY impressed! I guess now he'll be playing around for the next few hours trying to see what other kind of information he can get that way. I think you made his whole day. You have my sincere thanks, and a star (if I could give you ten, I would). Where did you find out about WMI? He spent hours yesterday searching for information about windows handles, etc. and didn't find a single reference to WMI.


Tracy Dryden

Meddle not in the affairs of dragons,
For you are crunchy, and good with mustard.

 

[chiph]

WMI info is typically available via TechNet, not MSDN.

Chip H.


____________________________________________________________________
Donate to Katrina relief:

http://s1.amazon.com/paypage/PELYGQVJ8Q7IB/103-6821258-5919825

If you want to get the best response to a question, please read FAQ222-2244 first

 

[dglienna]

Google for ScriptoMatic2, which writes scripts for you, which are pretty easy to convert to vb6. Just concatenate a string instead of echo'ing the output to the screen, and then use a msgbox.

David

 

[strongm]

Yep, Scriptomatic is a great tool