sending mail using OLE

[Former Member]

Hello All,

I am sending mail using OLE and the mail is sent successfully.

But before sending mail, a popup appears of confirmation for sending mail.

I want to avoid this popup.

How can i do it ?

is there any class or property for Pop up box ?

Here is the code that i am using:

FORM send_mail_to_vendor  USING    p_vendor_email_id        "#EC *
                                   p_vendor_title
                                   p_vendor_name
                                   p_vendor_login
                                   p_vendor_pass.


DATA : outlook LIKE obj_record,
         outmail LIKE obj_record,
         message TYPE string,
         new_line TYPE c VALUE cl_abap_char_utilities=>newline,
         obj_mail TYPE REF TO cl_crm_email_utility_base.


  CONCATENATE 'You are successfully registered'  p_vendor_title
                  p_vendor_name '!' new_line
                 'Your login id is:' p_vendor_login new_line
                 'And password is:' p_vendor_pass INTO message
                  SEPARATED BY space.


  CREATE OBJECT outlook 'Outlook.Application'.
  CALL METHOD OF outlook 'CREATEITEM' = outmail EXPORTING #1 = 0.
  SET PROPERTY OF outmail 'TO' = p_vendor_email_id.
  SET PROPERTY OF outmail 'SUBJECT' = 'Registration Successful'.
  SET PROPERTY OF outmail 'BODY' = message.
  CALL METHOD OF outmail 'SEND'.

  FREE OBJECT outlook.

 endform.

[Former Member]

after CALL METHOD OF outmail 'SEND'.

use the following code

SUBMIT rsconn01 WITH mode EQ 'INT' AND RETURN.

COMMIT WORK .

this may helpful for u.

[Former Member]

Thanks for the reply Subas,

But it did not solve the problem.