How to check if a process has completed.

[ghalewood]

Hi All,

I am building an Access DB to control the running of Essbase loads and recalcs on a number of different cubes. I believe that I can use the shell command to start the dataloads and recalcs. As some of the recalcs take hours and I can't wait until one load/recalc has finished before I can start another. I need to have a method of seeing if a process is still running.

The shell command will provide me with the process number

intPid = Shell("D:\essbase\Esscmd.exe D:\Calc.esc")

How can I use the intPid to determine if the process is still running?

The cubes are on the same server and are populated using data extracts from the mainframe. These data files can arrive at different times. My application would check to see if the files have arrived, start the load, then send mails when the load has finished or warning mails if they haven't finished after a certain time.

Thanks in advance
Graham

 

[Remou]

This may help:
Shell Program and Control (MS Access)
thread709-1193536

 

[ghalewood]

I think I have it. I'll have a play around with the code.

Thank You.

Private Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long


Private Const SYNCHRONIZE = &H100000



    ' Wait for the App
    hProc = OpenProcess(SYNCHRONIZE, 0, lProcID)
    If hProc <> 0 Then
        'hasn't finished, carry on with other things
    End If