Inbox Mail

Inbox Mail

Postby Jack » Wed Oct 22, 2008 2:31 pm

I want to read the messages in the inbox of Outlook or direct
from the pop server .
I want also to save the attached files (if present) in a defined folder .

I want to do that with a Fivewin program .

Thanks

Ph Jacquet (Belgium)
Jack
 
Posts: 288
Joined: Wed Jul 11, 2007 11:06 am

Postby James Bott » Wed Oct 22, 2008 4:08 pm

Here is some code to read the Inbox. I don't have any for moving to a folder.

Regards,
James


Code: Select all  Expand view
#define olFolderInbox 6

FUNCTION MAIN()

    LOCAL oOutlook := CREATEOBJECT( "Outlook.Application" )
    LOCAL oNameSpace := oOutlook:GetNameSpace("MAPI")
    LOCAL oInbox := oNameSpace:GetDefaultFolder( olFolderInbox )

    LOCAL i

    FOR i = 1 TO oInbox:Items:Count
        ? oInbox:Items[ i ]:Body
        ?
    NEXT

    oOutlook:Quit()

    RETURN NIL
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA

Postby RAMESHBABU » Thu Oct 23, 2008 11:36 am

Mr.James,

Is there a similar way to read messages from Outlook Express ?

- Ramesh babu P
User avatar
RAMESHBABU
 
Posts: 624
Joined: Fri Oct 21, 2005 5:54 am
Location: Secunderabad (T.S), India

Postby Enrico Maria Giordano » Thu Oct 23, 2008 9:04 pm

No, OE isn't an OLE server.

EMG
User avatar
Enrico Maria Giordano
 
Posts: 8710
Joined: Thu Oct 06, 2005 8:17 pm
Location: Roma - Italia

Postby driessen » Fri Oct 24, 2008 12:02 am

James,

How can we handle attachments in your example ?

Thanks.
Regards,

Michel D.
Genk (Belgium)
_____________________________________________________________________________________________
I use : FiveWin for (x)Harbour v. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium

Postby James Bott » Fri Oct 24, 2008 5:00 pm

Michel,

>How can we handle attachments in your example ?

I don't know, I have never used it. You probably need to look at the Outlook OLE documentation.

James
User avatar
James Bott
 
Posts: 4840
Joined: Fri Nov 18, 2005 4:52 pm
Location: San Diego, California, USA


Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 79 guests