Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Running 2x in a vfp6 window
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Titre:
Running 2x in a vfp6 window
Divers
Thread ID:
00246847
Message ID:
00246847
Vues:
53
Yeh guys, I know I will get grief from this one.
A little history...I have many old 2x applications to Y2k test and get running in our current environment - vfp6. I have developed a process to enable us to run these old dos apps from our main application by using a generic main.prg to create the user right varible and give the app access to our about window and allow it to exit to the main launch app.

I created a form with no controls and put the dos apps main program in the init event, with some massaging. Which has pretty much worked. My problem is: an error message "file is not open" error 1113. Is this a path problem? The prg's are part of the project. This happens when a menu select is made from the below code:
STOR 1 TO chox
@ 6,28 PROMPT " 0. QUIT "
@ 8,28 PROMPT " 1. ADD CHARGES "
@ 10,28 PROMPT " 2. EDIT CHARGES "
@ 12,28 PROMPT " 3. MONTHLY REPORTS "
@ 14,28 PROMPT " 4. DATABASE CLEANUP "
@ 16,28 PROMPT " 5. QUIK BY-ORG REPORT "
@ 18,28 PROMPT " 6. FULL BILL AS INPUT "
@ 20,28 PROMPT " 7. CARD MAINTENANCE "
MENU TO chox
do case
case chox = 1
thisform.release
case chox = 2
do Add.prg
etc.....
endcase
There is a read events when this form is instaniated. The program runs sometimes but I cannot figure out when or what setting is controlling the "DO ??.prg", making the file unavailable or invisible to the calling routine.

I know this is an unorthodox way of handling this, but I cannot rewrite these apps and I need them to run in the vfp6 environment.

Thanks to anyone who dares, Chuck
Extreme Programming = Plan -> Design -> Code -> Test
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform