Run an Access executable from a Foxpro program

[AllCaz]

A client would like to be able to launch an Access program from a Foxpro program. Is there a way to launch the Access program as a separate task so that it doesn't suffer any performance hit from Foxpro overhead? Is RUN /N the way to go or is there an API call or something else that is better?

 

[Diederik]

There are several ways to launch a program by API calls.
Just to give a few:

DECLARE INTEGER WinExec IN KERNEL32 STRING lpCmdLine, INTEGER uCmdShow

WinExec(<cCommand>, <nWindowstyle> )

An example of the above can be found in this forum, search for the topic "!|RUN"

DECLARE LONG ShellExecute IN "shell32.dll";
	LONG hwnd ,;
	STRING lpOperation ,;
	STRING lpFile ,;
	STRING lpParameters , ;
	STRING lpDirectory ,;
	LONG nShowCmd

ShellExecute(<nHandle>, <cOperation>, <cFile>, <cParameters>, <cDirectory>, <nWindowStyle>)

Fe launching an URL:

ShellExecute(0, "open", cUrl, "", "", 1)

And then we can use the windows scripting host:

oShell = CREATEOBJECT("WScript.Shell")
oShell.Run( <cFilename>, <nWindowState>, <optional: lWaitForTermination>)

To run Access directly:

oShell.Run("MSAccess", SW_SHOWNORMAL)

Window styles:

#DEFINE SW_HIDE         0   && Window not shown! 
#DEFINE SW_SHOWNORMAL   1
#DEFINE SW_MINIZED      2
#DEFINE SW_MAXIMIZED    3

Diederik Vermeeren
verm1864@exact.nl