I have the following stub program exe which i originally compiled with vfp7 and the main called program compiled with vfp7.
No problems with the stub or main calling program with vfp7.
After updating to vfp9 with service pack 2 - compiling both programs with vfp9, the stub.exe crashes with the fatal error C0000006.
If i leave the stub.exe compiled with the vfp7 it does not crash when it calls the main program compiled with vfp9.
Does anyone know what would cause this error code with vfp9? And would it cause memory/crash problems to leave it compiled with
different versions?
Here is the stub program code:
LOCAL lcexecpath,lcfilename,lcskeleton,lnfilecount
LOCAL lcexe,ltlatest, lnI
LOCAL ARRAY lafiles(1)
* get the path to the executable directory
lcexecpath = JUSTPATH(SYS(16))
SET RESOURCE OFF
*make that the default
SET DEFAULT TO (lcexecpath)
* get the root name of the executable program
lcfilename = JUSTSTEM(SYS(16))
*build an array of all possible exe names
lcskeleton = lcfilename+"??.exe"
lnfilecount = ADIR(lafiles,lcskeleton)
*look for the most recent exe file
lcexe = ""
ltlatest = {}
FOR lnI = 1 TO lnfilecount
IF FDATE(lafiles(lnI,1),1) > ltlatest
ltlatest = FDATE(lafiles(lnI,1),1)
lcexe = lafiles(lnI,1)
ENDIF
ENDFOR
*launch the most recent exe file
IF NOT EMPTY(lcexe)
DO (lcexe)
ENDIF
Teresa Pickering
Professional Computer Services
No problems with the stub or main calling program with vfp7.
After updating to vfp9 with service pack 2 - compiling both programs with vfp9, the stub.exe crashes with the fatal error C0000006.
If i leave the stub.exe compiled with the vfp7 it does not crash when it calls the main program compiled with vfp9.
Does anyone know what would cause this error code with vfp9? And would it cause memory/crash problems to leave it compiled with
different versions?
Here is the stub program code:
LOCAL lcexecpath,lcfilename,lcskeleton,lnfilecount
LOCAL lcexe,ltlatest, lnI
LOCAL ARRAY lafiles(1)
* get the path to the executable directory
lcexecpath = JUSTPATH(SYS(16))
SET RESOURCE OFF
*make that the default
SET DEFAULT TO (lcexecpath)
* get the root name of the executable program
lcfilename = JUSTSTEM(SYS(16))
*build an array of all possible exe names
lcskeleton = lcfilename+"??.exe"
lnfilecount = ADIR(lafiles,lcskeleton)
*look for the most recent exe file
lcexe = ""
ltlatest = {}
FOR lnI = 1 TO lnfilecount
IF FDATE(lafiles(lnI,1),1) > ltlatest
ltlatest = FDATE(lafiles(lnI,1),1)
lcexe = lafiles(lnI,1)
ENDIF
ENDFOR
*launch the most recent exe file
IF NOT EMPTY(lcexe)
DO (lcexe)
ENDIF
Teresa Pickering
Professional Computer Services