Hi Timothy,

Maybe these examples are helpful:


; read the entire mailbox contents with "read":

mailbox: read pop://user:[EMAIL PROTECTED]


; three ways to loop through the block of retrieved messages:

foreach message mailbox [editor message]

forall mailbox [editor first mailbox]

c: 1
while [c <= length? mailbox] [
        editor pick mailbox c
        c: c + 1
]

; or, open the mailbox as a port, read each mail item individually (directly
from the server), and then close the port:

mailboxx: open pop://user:[EMAIL PROTECTED]

forall mailboxx [
        editor first mailboxx
]

close mailboxx



Quoting Timothy Collins <[EMAIL PROTECTED]>:

>
> I have this little bit of code :
>    mailbox: read pop://XXX:[EMAIL PROTECTED]
>    ctr: 0
>    foreach message mailbox [
>      print pick mailbox ctr
>      wait 0:00:5
>      remove at mailbox ctr
>      ctr: ctr + 1
>    ]
>
> It seems to work perfectly happily, however it always skips the first
> message. How do I make it read the first message in the list?
> --
> To unsubscribe from the list, just send an email to
> lists at rebol.com with unsubscribe as the subject.
>
>



-- 
To unsubscribe from the list, just send an email to 
lists at rebol.com with unsubscribe as the subject.

Reply via email to