01-30-2009 8:16 AM
I am trying to send an email with OLE and i have only one problem . I can fill the subject and the receivers .
The only problem is that i can't fill the body of the mail.
Look my code ...
DATA: OUTLOOK TYPE OLE2_OBJECT,
MAILITEM TYPE OLE2_OBJECT,
ATTACHMENTS TYPE OLE2_OBJECT,
SUCCES TYPE OLE2_OBJECT,
APPT TYPE OLE2_OBJECT,
BODYMAIL(600) TYPE C.
....
....
....
CREATE OBJECT OUTLOOK 'Outlook.Application'.
*Create a new email:
CALL METHOD OF OUTLOOK 'CREATEITEM' = MAILITEM EXPORTING #1 = 0.
*Set Outlook's properties:
SET PROPERTY OF MAILITEM 'TO' = ADR6-SMTP_ADDR.
SET PROPERTY OF MAILITEM 'CC' = ' '.
SET PROPERTY OF MAILITEM 'SUBJECT' = DOC_CHNG-OBJ_DESCR ."' '.
CALL METHOD OF MAILITEM 'ATTACHMENTS' = ATTACHMENTS.
*Call the action.
CALL METHOD OF MAILITEM 'DISPLAY'.
*Close every instances.
FREE SUCCES.
FREE ATTACHMENTS.
FREE MAILITEM.
FREE OUTLOOK.
Thank you very much ....
01-30-2009 8:23 AM
01-30-2009 8:23 AM
01-30-2009 8:31 AM
Hi,
Just add this code and check.
SET PROPERTY OF MAILITEM 'BODY' = 'bodymail'.
Regards
06-19-2023 7:51 AM