try adding a DO EVENTS to the loop Arnon > I tried this but this was locking the CPU and the Receive() event was never > fired. > > FOR lnCompteur=1 TO 100 > Send('Something') > llReady=.F. > * We assume the Receive() event will make llReady=.T. > DO WHILE llReady > ENDDO > NEXT > > Then, I tried with a timer but with no success. > > Any idea? >