Seding mail forms using outlook with attachment

From: <jayesh.prabhu_at_gmail.com>
Date: 29 Mar 2006 02:46:39 -0800
Message-ID: <1143629199.830405.102000_at_z34g2000cwc.googlegroups.com>

Hi ,
[Quoted] My application has to send simple mail using forms. Below is code for sending mail.

DECLARE
  objOutlook OLE2.OBJ_TYPE;
  objMail OLE2.OBJ_TYPE;
  objArg OLE2.LIST_TYPE;
BEGIN
  objOutlook := OLE2.CREATE_OBJ('Outlook.Application');   objarg := OLE2.CREATE_ARGLIST;
  OLE2.ADD_ARG(objarg,0);
  objMail := OLE2.INVOKE_OBJ(objOutlook,'CreateItem',objarg);   OLE2.DESTROY_ARGLIST(objarg);

  OLE2.SET_PROPERTY(objmail,'To',:TO);
  OLE2.SET_PROPERTY(objmail,'Subject',:SUBJECT);
  OLE2.SET_PROPERTY(objmail,'Body',:BODY);

  OLE2.INVOKE(objmail,'Send');
  OLE2.INVOKE(objmail,'Display');

  OLE2.RELEASE_OBJ(objmail);
  OLE2.RELEASE_OBJ(objOutlook);
Message('Your mail sent successfully..............'); Message('Your mail sent successfully..............'); END; This is working fine.
Now I want to add "Attachment" facility in this form. [Quoted] Need this help urgently. Pls.

Jayesh. Received on Wed Mar 29 2006 - 12:46:39 CEST