Attente de fin d'execution d'un programmeRésolu

Question

Bonjour,
Je programme une interface utilisateur en visual basic 2005 pour un programme de calcul écrit en fortran.
Avec System.Diagnostics.Process.Start( ) je lance l'application fortran dans la console windows.
Ensuite je dois attendre que cette application soit terminée pour continuer la routine vb...
j'ai tenté de regarder dans WaitForSingleObject .... mais sans résultat...

comment puis-je faire "attendre" vb jusqu'à la fin de l'execution du programme fortran?

merci de votre aide!!

Renfield · Accepted Answer

gardes l'instance de Process qui t'es renvoyée.

en l'occurrence, il s'agira de tester :

myProcess.hasExited

Manolitoos · Answer

Salut,

Peut-être qu'en scrutant les processes, tant qu'il existe, le programme attend et une fois qu'il a disparu des processus, c'est ok.

 Manolitoos

Renfield · Answer

pendant que tu attends la fin de ton process, en tous cas, je t'ai trouvé une occupation...


lire la doc ^^

la liste des membres
http://msdn2.microsoft.com/fr-fr/library/system.diagnostics.process_members(VS.80).aspx

on attend la fin
http://msdn2.microsoft.com/fr-fr/library/system.diagnostics.process.waitforexit(VS.80).aspx

est-ce que le process tourne ?
http://msdn2.microsoft.com/fr-fr/library/system.diagnostics.process.hasexited(VS.80).asp
x

on est avertit a la fin...
http://msdn2.microsoft.com/fr-fr/library/system.diagnostics.process.onexited(VS.80).aspx

francoisIAG · Answer

Hey! merci de ta réponse rapide!!
en fait j'utilise déjà le code ci-dessous pour scruter les processes


Public Function IsProgramRunning() As Boolean
        Dim isRunning As Boolean
        Dim localAll As Process() = Process.GetProcesses()
        Dim length As Integer

        length = localAll.GetLength(0)

        isRunning = False

        For i As Integer = 0 To length - 1
                       If localAll(i).ToString.Contains("ProgrammeName") Then
                isRunning = True
            End If
        Next

        Return isRunning
    End Function

et dans le code appelant la fonction je fais une boucle

Do While isProgramBusy = True
                        isProgramBusy = IsProgramRunning()
                        System.Threading.Thread.Sleep(500)
Loop

le problème est d'une part que mon interface vb est totalement inactive pdt le sleep et surtout qu'apres 60 secondes
j'ai le message d'erreur suivant (traduit automatiquement de l'allemand...) qui bloque mon programme:

Le CLR ne pouvait exécuter pendant 60 secondes aucun passage(passerelle) du contexte COM 0x1a0848 au contexte COM 0x1a09b8. Le fil, le propriétaire du contexte de but /-apartments est, attend sans déplacer des annonces, ou une opération de longue durée très longtemps traite sans déplacer des annonces de Windows. Une telle situation perturbe, habituellement, l'exécution(la productivité) et peut mener même vers ce que l'emploi(application) ne réagit plus ou la charge de mémoire augmente toujours. A l'évitement de ce problème, tous les fils STA devaient utiliser les types primitifs qui déplacent des annonces (par exemple CoWaitForMultipleHandles) au poste d'observation, et lors de longues opérations de longue durée 




déplacent 








généralement des annonces .

Renfield · Answer

euh... je crois que tu n'a lus ce que je t'ai filé...

ton IsProgrammRunning peut etre remplacé 

par Process.hasexited

ton 
Do While isProgramBusy = True
                        isProgramBusy = IsProgramRunning()
                        System.Threading.Thread.Sleep(500)
Loop

peut etre remplacé par
Process. waitforexit

et si tu ne souhaites pas bloquer ton programme pendant l'attente, utilise l'evenement onexited

francoisIAG · Answer

Désolé j'étais un peu décalé..

comment indiques tu le nom du process avec process.hasexited ?

si tu le lance avec 
myProcess = Process.Start("Notepad.exe") ,par exemple, pas de problème
mais s'il est déjà lancé et qu'on attend juste qu'il se termine comment lui indiquer le nom?

francoisIAG · Answer

ma question était en fait : comment lui indiquer que c'est le process "notepad.exe" qui m'interesse ?

merci de ta patience!!

Renfield · Answer

tu dois récuperer un objet Process... 
a faire si le programme est lancé par l'utilisateur...

si c'est toi qui fais un Process.Start, il est bien plus simple de conserver l'instance a ce moment là

francoisIAG · Answer

Merci Renfield!

Attente de fin d'execution d'un programme

9 réponses

Votre réponse

Discussions similaires