//Lecture du "pipe" en lecture pour récupérer les infos !
BOUCLE
Resultat = API("Kernel32","ReadFile",:HLecturePipe, &strBuff, 256, &LngOctetRec, 0)
:mOutputs = :mOutputs + Gauche(strBuff, LngOctetRec)
QUAND EXCEPTION DANS
//Envoie les données au programme via l'événement
ExécuteTraitement("WDDOS_ReceiveOutputs",trtProcédure,Gauche(strBuff,LngOctetRec))
FAIRE
FIN
Multitâche(-1)
SI Resultat = 0 ALORS SORTIR
FIN
Cette contribution était de : http://old.wdforge.org/newbb/viewtopic.php?forum=14&topic_id=2278&post_id=9610