Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Nocturnal print via MUTEX and Run-App-and-Wait
Message
 
 
À
17/08/1999 19:47:11
Information générale
Forum:
Visual FoxPro
Catégorie:
Fonctions Windows API
Divers
Thread ID:
00254699
Message ID:
00255455
Vues:
22
Ed and George,
I know this is got to be simple but I can't get those nightly reports automated


...You want to make sure that you're using my API_APPRUN class ...download it ..., and then start up an instance of Quest using launchApp - which runs the program and immediately returns control to VFP. You can periodically check the progress of the application using the object's CheckProcessExitCode() method; if returns a value other than 259, the other instance is done.

Paste Edgar's code here:
DO WHILE .NOT. EOF()
. nCNTER= nCNTER+1
. cCmdLineOut= Alltrim(REPORTS)
. oQuest=CREATEOBJECT('API_APPRUN',cCmdLineOut, "C:\Gupta\", "HIDE")
. =LaunchAppAndWait(cCmdLineOut, "C:\Gupta\","HIDE")
. Do While .T.
.. Wait Window NoWait "Running Quest Report Number "+ str(nCNTER)
.. IF oQuest.CheckProcessExitCode() != 259 && 259=ProcessRunning
... RELEASE oQuest
... EXIT
.. ENDIF
. EndDo
. SKIP
ENDDO

This code miserably fails (loop forever)
also if I do not loop while the first Quest is active
then an GPF occurs because two Quest are requested?!?

What's next? (Thanx for help)
Edgar L. Bolton, B.S. B.B.A.
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform