VBA - Exibindo a Lista de Processos ativos na sua máquina usando (WMI)

Vez ou outra listamos todos os programas que estão sendo executados em nossa máquina. Podemos disponibilizar tais informações aos usuários da nossa aplicação através da funcionalidade abaixo, podemos saber todos os processo que estão rodando na máquina. Function LoadInProcess() Dim colProcessList Dim objProcess Set colProcessList = GetObject("Winmgmts:").ExecQuery("Select * from Win32_Process") ListProcessNow.clear For Each objProcess In colProcessList ListProcessNow.additem objProcess.Name Next Set colProcessList = Nothing Se você quiser detalhes sobre um proceso específico, poderá filtrá-los por processo. Por exemplo, se desejar analisar ou finalisar o Iexplore.exe rodando na sua máquina, poderá tentar o código abaixo: Let strProcess = "Iexplore.exe" Dim colProcessList Dim objProcess Set colProcessList = GetObject("Winmgmts:").ExecQuery("Select * from Win32_Process where name = '" & strProcess & "'") For Each objProcess In colProcessList objProcess.Terminate Next Set colProcessList = Nothing Queira aprofundar o seu conhecimento no link abaixo, afinal, foram eles que criaram o que podemos explorar hoje... http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wmisdk/wmi/wmi_reference.asp

André Luiz Bernardes A&A - WORK, DON´T PLAY! http://al-bernardes.sites.uol.com.br/ bernardess@gmail.com