Running applications
I need to run two applications. But I need to wait for the first one to finish before I start the second one. I'm using the Shell function to run both apps. Is there another function that I can use to run an app and have it finish before the other starts?
Just to clarify. So call your applications by using the ExecCmd function, instead of using Shell.
:) David
:) David
Sub commercial_apps(apps As String)
Dim proc As PROCESS_INFORMATION
Dim Start As STARTUPINFO
Start.wShowWindow = False
' Initialize the STARTUPINFO structure:
Start.cb = Len(Start)
' Start the shelled application:
ret& = CreateProcessA(0&, apps, 0&, 0&, 1&, _
NORMAL_PRIORITY_CLASS, 0&, 0&, Start, proc)
End If
' Wait for the shelled application to finish:
ret& = WaitForSingleObject(proc.h
ret& = CloseHandle(proc.hProcess)
End Sub
call commercial_apps("applicati
This code is working very well i use it in my own programm..
Dim proc As PROCESS_INFORMATION
Dim Start As STARTUPINFO
Start.wShowWindow = False
' Initialize the STARTUPINFO structure:
Start.cb = Len(Start)
' Start the shelled application:
ret& = CreateProcessA(0&, apps, 0&, 0&, 1&, _
NORMAL_PRIORITY_CLASS, 0&, 0&, Start, proc)
End If
' Wait for the shelled application to finish:
ret& = WaitForSingleObject(proc.h
ret& = CloseHandle(proc.hProcess)
End Sub
call commercial_apps("applicati
This code is working very well i use it in my own programm..
I had not tried the code until recently but the problem I'm running into now is that it will wait for a period of time but not long enough. The orginal application is still running when the second one is launched. Should I change the INIFINITE?
Two questions - 1) What OS 2) What are you tring to run? I've noticed that running control panel applets do seem to time out waiting, but works for everything else. Let me know and I'll see if I can help you out.
:) D Perry
:) D Perry
I had not tried the code until recently but the problem I'm running into now is that it will wait for a period of time but not long enough. The orginal application is still running when the second one is launched. Should I change the INIFINITE?
The OS that I'm running is Win95 OSR2. And my app is running the Share Agent for Oracle. What happens is my app will launch the share agent and wait but when the share agent starts installing tools it exits the routine, while the share agent is still open, and continues through my code. This will then launch Oracle Applications before it has been updated.
Do you know if the Agent (the intial process) spawns off another process, and then closes itself, eg You are trying to launch a process that end up launching another process. If so, we could have problems because the ExecCmd waits for 1 particular process to end. Let me know if this is case.
:) D Perry
:) D Perry
Thanks for using Experts Exchange.
Please provide your email to receive a free trial preview!
*This site is protected by reCAPTCHA and the Google Privacy Policy and Terms of Service apply.