Shell : passer outre le mode asynchrone

Question

Bonjour,
J'ai cr&#233;&#233;e une page d'accueil toute simple qui est cens&#233;e ex&#233;cuter divers programmes suivant les options coch&#233;es.

If op_t1 =  True Then


 fichier_a_executer = Shell("\toto.exe", vbNormalFocus) 


ElseIf op_t1_dr  = True Then


fichier_a_executer = Shell("\titi.exe", vbNormalFocus)


End if



Je souhaiterais "bloquer" ma page d'accueil pour que l'on ne puisse pas lancer plusieurs programmes en m&#234;me temps, hors une fois que j'en ais lanc&#233; un je peux reprendre la main de la page d'accueil .
Le Shell n'attend pas la fin de l'ex&#233;cution du programme lanc&#233; il passe imm&#233;diatement &#224; la suite.
Y a-t-il une option qui permette d&#146;attendre ?


Merci
caroline

crenaud76 · Answer

Pas d'option pour un Shell synchrone, mais j'ai une source sur ce site (toute petite : 10 lignes de code maxi) qui permet de faire cela ...

Christophe R.

Shell : passer outre le mode asynchrone

1 réponse

Discussions similaires