title image


Smiley Re: Prüfen ob Exe gestartet
oder etwas kürzer, ohne durch alle procese zu laufen und nicht key sensitive:Dim�sComputer�'As�StringDim�sProcess�'As�StringDim�oWMI�'As�WbemScripting.SWbemServicesDim�colProcess�'As�ObjectDim�oProcess�'As�WbemScripting.SWbemObjectsComputer�=�"."sProcess�=�"outlook.exe"Set�oWMI�=�GetObject("winmgmts:\\"�&�sComputer�&�"\root\CIMV2")����Set�colProcess�=�oWMI.ExecQuery("SELECT�*�FROM�Win32_Process�WHERE�Caption='"�&�sProcess�&�"'")��������For�Each�oProcess�in�colProcess�������������Wscript.Echo�"Found:�"�&�oProcess.Caption�&�"�running!"��������Next����Set�colProcess�=�NothingSet�oWMI�=�NothingsProcess�=�vbNullStringsComputer�=�vbNullStringCode eingefügt mit Syntaxhighlighter 4.0


mfg Mike

Snafu



geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: