Application Development Discussions
Join the discussions or start your own on all things application development, including tools and APIs, programming models, and keeping your skills sharp.
cancel
Showing results for 
Search instead for 
Did you mean: 

Open outlook editor from interactive with attachment

Former Member
0 Kudos

Hi All,

I have a requirement where i have to open the MS outlook editor from interactive with a attachment.

Thanks

Shafiq

1 ACCEPTED SOLUTION

former_member182670
Contributor
0 Kudos

Slightly modified version of program from thread:


INCLUDE ole2incl .
DATA: lr_outlook TYPE ole2_object,
      lr_mi TYPE ole2_object,
      lr_atts TYPE ole2_object,
      lv_body TYPE string,
      lv_sig type string.

CREATE OBJECT lr_outlook 'Outlook.Application'.

CALL METHOD OF lr_outlook 'CreateItem' = lr_mi
  EXPORTING #1 = 0.

SET PROPERTY OF lr_mi 'To' = 'your@to.address'.
SET PROPERTY OF lr_mi 'CC' = 'your@cc.address'.
SET PROPERTY OF lr_mi 'Subject' = 'Your subject'.

GET PROPERTY OF lr_mi 'Attachments' = lr_atts.
CALL METHOD OF lr_atts 'Add'
  exporting #1 = 'C:TPHKLOCK.TXT'.

GET PROPERTY OF lr_mi 'Body' = lv_sig.


CONCATENATE 'First line' cl_abap_char_utilities=>newline
  INTO lv_body.
CONCATENATE lv_body 'Second line' cl_abap_char_utilities=>newline
  INTO lv_body.
CONCATENATE lv_body 'Third line' cl_abap_char_utilities=>newline
  INTO lv_body.

CONCATENATE lv_body lv_sig  INTO lv_body.

SET PROPERTY OF lr_mi 'Body' = lv_body.

CALL METHOD OF lr_mi 'Display'.

FREE OBJECT lr_outlook.

3 REPLIES 3

Former Member
0 Kudos

Hi,

Check this link,

It may help you.

https://forums.sdn.sap.com/click.jspa?searchID=5758250&messageID=3871103

Thanks,

Reward If Helpful.

former_member182670
Contributor
0 Kudos

Slightly modified version of program from thread:


INCLUDE ole2incl .
DATA: lr_outlook TYPE ole2_object,
      lr_mi TYPE ole2_object,
      lr_atts TYPE ole2_object,
      lv_body TYPE string,
      lv_sig type string.

CREATE OBJECT lr_outlook 'Outlook.Application'.

CALL METHOD OF lr_outlook 'CreateItem' = lr_mi
  EXPORTING #1 = 0.

SET PROPERTY OF lr_mi 'To' = 'your@to.address'.
SET PROPERTY OF lr_mi 'CC' = 'your@cc.address'.
SET PROPERTY OF lr_mi 'Subject' = 'Your subject'.

GET PROPERTY OF lr_mi 'Attachments' = lr_atts.
CALL METHOD OF lr_atts 'Add'
  exporting #1 = 'C:TPHKLOCK.TXT'.

GET PROPERTY OF lr_mi 'Body' = lv_sig.


CONCATENATE 'First line' cl_abap_char_utilities=>newline
  INTO lv_body.
CONCATENATE lv_body 'Second line' cl_abap_char_utilities=>newline
  INTO lv_body.
CONCATENATE lv_body 'Third line' cl_abap_char_utilities=>newline
  INTO lv_body.

CONCATENATE lv_body lv_sig  INTO lv_body.

SET PROPERTY OF lr_mi 'Body' = lv_body.

CALL METHOD OF lr_mi 'Display'.

FREE OBJECT lr_outlook.

0 Kudos

Dear Tomasz Mackowski,

I have seen your thread

As per my Requirement it is very useful to me .

i have another Question. is it possible Randomly Change the Sender Email Address.

Because in my System Outlook configured with my Name. But I need mails from Others Mail-Id.

Pls share me details at sureshtullimilli@gmail.com

Once again Thank you very much for your post.

Regards

Suresh