Hi Fernando,

You don't need a loop because READ EVENTS start event processing that can be canceled only by CLEAR EVENTS. I don't think you need form eaither. Here's sample code (not tested)

Application.Visible = .F.  && There is a screen=off in config.fpw
On ShutDown CLEAR EVENTS
nMessage = 0
Do CriaObj
Read  Events
Return

* -------------------------------------------
 Procedure CriaObj
 oMailLoop = CreateObj ("MailLoop")
 EndProc && CriaObj
* -------------------------------------------
 Function SendMapiMail
 LParameters pMessage
 . . .
 EndFunc && SendMapiMail
* -------------------------------------------
 Define Class MailLoop as Timer

        Name   = "MailLoop"
        Procedure Timer
                  This.Enabled = .F.
                  nMessage = nMessage + 1
                  SendMapiMail ("This is message #" + lTrim (Transform (nMessage, "999,999")))

                  This.Interval = 20000    && 20 sec's
                  This.Enabled = .T.
        EndProc

        Procedure Init
                  This.Interval = 100   && Let it fire immidiately
                  This.Enabled = .T.
        EndProc

 EndDefine

>
>I changed prg's logic. Its works fine as below, but if I change Application.Visible to .F., it starts, appears in win2k task manager list, but does nothing.
>
>Any idea? I'm not sure about the read events loop I did, too.
>
< snip >