Thank you. That did the trick.

Neil

>Check out file #9477 in the downloads.
>
>HTH
>
>Dan
>
>>Hi UTers,
>>I need to know when a program that I RUN /N from vfp is closed before I continue with my vfp code. When I "RUN /N emodel.exe" I find that vfp continues even though emodels.exe is still on the desktop. How do I develop a wait state within vfp so that I don't proceed until emodels.exe is closed. I can do it with word in the following way:
>>
>>****************************************************************************
>>
>>DECLARE LONG FindWindowA IN WIN32API STRING class, STRING title
>>DECLARE INTEGER SendMessage IN Win32API INTEGER HWND,INTEGER Msg, Short WParam, INTEGER LPARAM)
>>
>>Declare short IsWindow in WIN32API integer
>>declare Sleep in win32API integer
>>
>>oWord = Createobject('Word.Application')
>>* Pass the class name for Word - "OpusApp" to FindWindowA
>>oWordHandle = FindWindowA('OpusApp',NULL)
>>WITH oWord
>> .Documents.Add
>> .Visible=.T.
>> .Selection.InsertAfter ("This is a test.")
>> .Application.Activate && Activate Word.
>>ENDWITH
>>=INKEY(3) && Wait a couple seconds then close Word.
>>
>>** =SendMessage(oWordHandle,16,0,0)
>>
>>** loop until word closes
>>do while IsWindow(owordhandle)#0
>> =sleep(250)
>>enddo
>>
>>** now that word is closed we can continue
>>***********************************************************************
>>
>>** but this is not WORD and emodels.exe is not a server
>>** please review the code below and advise
>>
>>= messagebox("you are in vfp Press OK to activate model program")
>>
>>** get path to emodel Program on this computer
>>cemodel= c:\emodel\emodel.exe
>>cUniqueID = "123456"
>>
>>If !File(cemodel)
>> = MESSAGEBOX("Sorry.... eCentricPractice could not locate GeoDigm emodel program.")
>> RETURN .f.
>>ENDIF
>>
>>cCommandLine = "PATIENT_ID " + cUniqueID + " JPEG_ABO_ALL" && v_patients.cID
>>
>>** WAIT WINDOW ccommandline
>>cRunLine = ["]+cemodel+["]+ " " + cCommandLine
>>
>>WAIT WINDOW cRunLine TIMEOUT .3
>>RUN /n &cRunLine
>>
>>* this is where I would like to test if emodel.exe is closed
>>= messagebox("You are back in vfp")