[E-00] - Openprocess et debug print

Bonjour,

Je me trouve à débuger une macro écrite par un collègue qui n'est plus là.
Dans cette macro il lançait des programmes en fortran en //.
Sa programmation se termine par:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12

If reponse > 0 Then ' Boucle d'attente de la fin d'exécution   Do   reponse2 = OpenProcess(PROCESS_QUERY_INFORMATION, False, reponse) Debug.Print reponse2   Loop While (reponse2 <> 0) End If End Sub

---

Je comprends la boucle do loop while mais qui peut m'expliquer les commandes OpenProcess et debug.print

Je pense qu'il s'agit d'une boucle permettant d'attendre qu'un fortran soit terminé

Merci

Bonjour,

Debug.Print est juste la pour ecrire une info dans le debugueur, ici on ecrit la valeur de reponse2

OpenProcess est une fonction windows qui se trouve dans une dll (kernel32)
il me semble qu'elle sert souvent pour recuperer l'identifiant du processus, pour en savoir plus tu peux regarder sa définition sur le site MSDN :

Citation:

---

The handle returned by the OpenProcess function can be used in any function that requires a handle to a process, such as the wait functions, provided the appropriate access rights were requested.

---

Elle doit être déclarée :

Code:

---

Declare Function OpenProcess Lib "kernel32" (ByVal dwDesiredAccess As Long, ByVal bInheritHandle As Long, ByVal dwProcessId As Long) As Long

---

Citation:

---

Je pense qu'il s'agit d'une boucle permettant d'attendre qu'un fortran soit terminé

---

Bon y a qu'un tout petit bout de code mais on semble effectivement attendre la fin d'un processus (variable reponse)

Je pense avoir saisi le sens de l'openprocess, par contre si quelqu'un pouvait m'expliquer les paramètres de la parenthèse peut être arriverai je à debuguer le programme.
En fait je pense que cette phrase a été écrite pour windows 2000 et maintenant on est sous XP. J'ai donc une correction de syntaxe à faire.

Pour debug.print j'ai compris qu'il s'agissait d'écrire dans debug, mais quel est ce fichier "debug"

Désolé de ne donner de mes nouvelles que maintenant mais j'étais très pris ces derniers temps.

Merci à tous

Bonjour,

Citation:

---

Pour debug.print j'ai compris qu'il s'agissait d'écrire dans debug, mais quel est ce fichier "debug"

---

Le résultat du debug peut être consulté dans la fenêtre d'execution (CTRL + G)

Citation:

---

Je pense avoir saisi le sens de l'openprocess, par contre si quelqu'un pouvait m'expliquer les paramètres de la parenthèse peut être arriverai je à debuguer le programme.

---

Openprocess n'est pas de code VBA mais une fonction windows ici appelée par VBA, tu peux trouver sa définition dans MSDN

Ok merci à tous

Ok bonne programmation :D