Clipper On Line • Ver Tópico - Descobrir se um processo (executável) está rodando

Descobrir se um processo (executável) está rodando

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

Descobrir se um processo (executável) está rodando

Mensagempor asimoes » 24 Mai 2014 10:25

Descobrir se um processo está rodando.

   objWMIService := WmiService() 

   colProcesses:= objWMIService:ExecQuery("SELECT * FROM Win32_Process WHERE Caption = 'notepad.exe'")

   For Each objProcess In colProcesses
      MsgInfo(objProcess:Handle +" " +objProcess:Name)
   Next

STATIC FUNCTION WMIService()

   Static oWMI

   Local oLocator

   if oWMI == NIL

      oLocator   := CreateObject( "wbemScripting.SwbemLocator" )
      oWMI       := oLocator:ConnectServer()

   endif

Return oWMI
â–ºHarbour 3.x | Minigui xx-x | HwGuiâ—„
Pense nas possibilidades abstraia as dificuldades.
Não corrigir nossas falhas é o mesmo que cometer novos erros.
A imaginação é mais importante que o conhecimento. (Albert Einstein)
Avatar de usuário

asimoes
Colaborador

Colaborador
 
Mensagens: 4919
Data de registro: 26 Abr 2007 16:48
Cidade/Estado: RIO DE JANEIRO-RJ
Curtiu: 341 vezes
Mens.Curtidas: 258 vezes

Descobrir se um processo (executável) está rodando

Mensagempor Claudio Soto » 24 Mai 2014 19:21

En HMG.3.3.0 tenes las funciones:
- EnumProcessesID () ---> return array { nProcessID1, nProcessID2, ... }
- GetCurrentProcessId() --> return nProcessID

- GetProcessName ( [ nProcessID ] ) --> return cProcessName
- GetProcessFullName ( [ nProcessID ] ) --> return cProcessFullName
Saludos.
Dr. Claudio Soto
(Uruguay)
http://srvet.blogspot.com
Avatar de usuário

Claudio Soto
Colaborador

Colaborador
 
Mensagens: 555
Data de registro: 27 Ago 2012 12:31
Cidade/Estado: Uruguay
Curtiu: 35 vezes
Mens.Curtidas: 166 vezes




Retornar para MiniGui

Quem está online

Usuários vendo este fórum: Nenhum usuário registrado online e 12 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro