FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin for Harbour/xHarbour Tole with outlook
Posts: 55
Joined: Fri Jul 08, 2011 06:43 AM
Tole with outlook
Posted: Fri Jul 29, 2011 11:17 AM
Hello ,

Next code gives now a error . I suppose that it worked a few years ago.

Code (fw): Select all Collapse
TRY
      oOutlook := GetActiveObject( "Outlook.Application" )
   CATCH
      TRY
         oOutlook := CreateObject( "Outlook.Application" )
      CATCH
         ?  "ERROR! Outlook not avialable. [" + Ole2TxtError()+ "]"
         RETURN
      END
   END
     trace()
        oMail := oOutlook:CreateItem( olMailItem )

        FOR EACH el IN aTo
            oMail:Recipients:Add( el )   <=== line 3357
        NEXT


Error : Called from: D:\xHarbour\source\rtl\win32ole.prg => TOLEAUTO:RECIPIENTS(0)
Called from: \MCLS\HENWIN8.10\PRINTSYSA.PRG => SENDOLMAIL(3357)


Is there a file available with methods and data from outlook ?

Frank

Continue the discussion