Remote Thread in another process 2

[sfuterma]

Hi,

1. How can I list / display / detailed, all Threads in a specific process.
2. After I found those details, how can I kill / stop, remote Thread, from my process.

Thanks,
Shai.

 

[ChrisRChamberlain]

sfuterma

Welcome to the forum.

The following code will list all running processes and remove all instances of MS Word

[COLOR=blue]oManager = GETOBJECT([winmgmts:])
oApps = oManager.InstancesOf([Win32_process])
CREATE CURSOR TEMP (name C(20))
FOR EACH PROCESS IN oApps
[tab]INSERT INTO TEMP (name) VALUES (LOWER(PROCESS.name))
NEXT

BROW

cQuery = [select * from win32_process where name='winword.exe']
oResult = oManager.ExecQuery(cQuery)
FOR EACH oProcess IN oResult
[tab]oProcess.Terminate(0)
NEXT[/color]

FAQ184-2483 - answering getting answered.​

Chris
PDFcommander[sup]tm[/sup].net
PDFcommander[sup]tm[/sup].com

 

[sfuterma]

Hi, I still need a way to know how can I list / display / detailed, all Threads in a specific process, on Windows. After I'll know each Threads details I need a way to stop or kill the specific Thread.

Thanks,
Shai.

 

[ChrisCarroll]

Chris,
Where did you get the "winmgmts:" name from?
Thanks,
Chris

 

[Mike Gagnon]

ChrisCarroll

Where did you get the "winmgmts:" name from?

http://www.freevbcode.com/ShowCode.asp?ID=5165

This is the syntax used with WMI (Windows Management Intstrumentation)

http://www.microsoft.com/whdc/system/pnppwr/wmi/default.mspx

Mike Gagnon

If you want to get the best response to a question, please check out FAQ184-2483 first.
ReFox XI (www.mcrgsoftware.com)

 

[ChrisRChamberlain]

Chris

Couple more links

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnanchor/html/anch_wmi.asp

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dnclinic/html/scripting06112002.asp

FAQ184-2483 - answering getting answered.​

Chris
PDFcommander[sup]tm[/sup].net
PDFcommander[sup]tm[/sup].com

 

[jesylv]

Hi Chris,

A star for you. I was just looking at a better way to prevent users from launching multiple instances of an application. I think you have FAQ material here!

Jean

http://www.sigp.ca

 

[ChrisRChamberlain]

Jean

Thanks for the star - the following use of WMI at the top of a main.prg to determine the running processes will prevent multiple instances of the same app.

[COLOR=blue]LOCAL llQuit[COLOR=green]	
*!* Check for instance(s) of Myapp running[/color]
oManager = GETOBJECT([winmgmts:])
cQuery = [select * from win32_process where name='myapp.exe']
oResult = oManager.ExecQuery(cQuery)

IF oResult.Count > 1
[tab]llQuit = .T.
ENDI[COLOR=green]	
*!* Clean up[/color]
oManager = .NULL.
oResult = .NULL.
RELEASE cQuery, oResult, oManager

IF llQuit[COLOR=green] && Myapp.exe running twice[/color]
[tab]QUIT
ENDI[/color]

FAQ184-2483 - answering getting answered.​

Chris
PDFcommander[sup]tm[/sup].net
PDFcommander[sup]tm[/sup].com