dim RTDispatchHandle Private Sub cmdRTDispatch_Click() On Error GoTo startapp AppActivate RTDispatchHandle GoTo skipstartapp startapp: RTDispatchHandle = Shell("notepad.exe", 1) skipstartapp: End SubVB's shell returns a task ID. AppActivate brings the app to the foreground if it is running. Can this be done in vfp?