Need script to run exe for 30 seconds and then close 1

[hydruid]

I have been googling this for hours and haven't found anything yet, I'm going to keep looking though

I want a vb script to run an executable file (.exe) for 30 seconds and then close automatically.

Any suggestions would be great!

 

[w33mhz]

you can try this

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set wshShell = WScript.CreateObject ("WSCript.shell")
wshshell.run "Path to Exe file"
sleep(30000)
Set colProcessList = objWMIService.ExecQuery _
    ("SELECT * FROM Win32_Process WHERE Name = '<name of exe>'")
For Each objProcess in colProcessList
    objProcess.Terminate()
Next

 

[w33mhz]

Note the .exe file and script need to be running on the same machine.

 

[hydruid]

thank you sooo much for your quick response.

I need to run the executable over a unc path

\\fs01\programs$\app.exe

 

[hydruid]

I used your script, and took out 2 lines, to test closing the application and it worked! Just now need to tweak it to run that application over a unc path

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set wshShell = WScript.CreateObject ("WSCript.shell")

Set colProcessList = objWMIService.ExecQuery _
("SELECT * FROM Win32_Process WHERE Name = 'App.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next

 

[hydruid]

Ok i got it working. I had to correct the sleep section. Also instead of using a unc path, I used a map drive. Here is the script:

strComputer = "."

Set objWMIService = GetObject("winmgmts:" _
& "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")
Set wshShell = WScript.CreateObject ("WSCript.shell")
wshshell.run "r:\app.exe"
WScript.Sleep(40000)
Set colProcessList = objWMIService.ExecQuery _
("SELECT * FROM Win32_Process WHERE Name = 'app.exe'")
For Each objProcess in colProcessList
objProcess.Terminate()
Next

 

[hydruid]

forgot to say thank you again!!!!

 

[w33mhz]

No Problem your welcome

 

[JPJeffery]

A great way of thinking people is to click on the " Thank JohnDoe for this valuable post!" link you'll see in each reply.


JJ
[small][purple]Variables won't. Constants aren't[/purple][/small]