The example you provided works if I take away "private" before each const. Would you happen
to know how to prevent the FoxPro logo and menu from coming up each time the .prg is
run? I suppose I could try running foxFpro exe, .prg that had been made into a exe file.

Thanks so much,
Steve Elster

Sub Macro1()
Const SW_HIDE = 0
Const SW_SHOWNORMAL = 1
Const SW_SHOWMINIMIZED = 2
Const SW_SHOWMAXIMIZED = 3
Const SW_SHOWNOACTIVATE = 4
Const SW_SHOW = 5
Const SW_MINIMIZE = 6
Const SW_SHOWMINNOACTIVE = 7
Const SW_SHOWNA = 8
Const SW_RESTORE = 9

Dim ProcessID As Long
Dim file2run As String

file2run = ("C:\Program Files\Microsoft Visual FoxPro 8\vfp8.exe ThisPrg.prg")
ProcessID = Shell(file2run, CLng(SW_SHOWNORMAL))
End Sub