How get message from dbx (Outlook Express)

How get message from dbx (Outlook Express)

Postby Romeo » Wed Apr 18, 2007 5:40 pm

Hi, any idea how get (with fwin) any single message from a DBX file of Outlook Express ?

I need it to get and process many many emails message in automatic mode using fwin
tks
Romeo/Zingoni
Romeo
 
Posts: 340
Joined: Thu Jan 25, 2007 3:53 pm
Location: Milan (Italy)

Re: How get message from dbx (Outlook Express)

Postby Enrico Maria Giordano » Wed Apr 18, 2007 9:20 pm

Code: Select all  Expand view  RUN
#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()

    INKEY( 0 )

    RETURN NIL


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

Postby James Bott » Wed Apr 18, 2007 11:40 pm

Enrico,

He specified Outlook Exrpess. Will your code work with it?

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

Postby Enrico Maria Giordano » Thu Apr 19, 2007 8:28 am

No, sorry. I missed it. :(

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

Postby James Bott » Thu Apr 19, 2007 2:56 pm

Romeo,

If the mail is coming off a POP3 server, then perhaps you can get the mail directly using TPop3. See samples\testpop3.prg.

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 102 guests