=?Utf-8?Q?Re:_Outlook_automation:_outlook_?= =?Utf-8?Q?don=E2=80=99t_quit?=

From:

"Ajay Kalra" <ajaykalra@yahoo.com>

Newsgroups:

microsoft.public.vc.mfc

Date:

Sat, 2 Feb 2008 13:20:23 -0500

Message-ID:

<1D9C69D5-580D-4CE7-88CB-A7E3BAA53F85@microsoft.com>

You should use CComPtr and its variants. All the interfaces would be
released automatically as the object goes out of scope.

---
Ajay

"Rui Oliveira" <RuiOliveira@discussions.microsoft.com> wrote in message
news:1C4D7B3A-2D43-462E-85E1-EA14490DDBFB@microsoft.com...

I am using the MSOutlook automation in C++ too send an email from my
application.

After send the email, I use the Quit method to close quit from Outlook,
but
the Outlook service didn???t not close. What can I do to exit Outlook?

My code is the following:

BOOL lb_outlookOpen = FALSE;
HANDLE icl_hProcess;
char buf[1024];
LPDISPATCH lpDisp;
HWND hWnd;
DWORD pid;
DWORD dThread;

// verify if Outlook is open
hWnd = ::FindWindow("rctrl_renwnd32", NULL);

if(hWnd)
  {lb_outlookOpen = TRUE;}

_Application olApp;
Attachments myAttachments;
if(!olApp.CreateDispatch("Outlook.Application"))
  return FALSE;

COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);

_MailItem olMail = olApp.CreateItem(0);
myAttachments = olMail.GetAttachments();

for(int i=0; i<icl_attachmentsListFiles.GetCount(); i++)
{
  COleVariant oAttachLocation(icl_attachmentsListFiles[i]);
  myAttachments.Add(oAttachLocation,
covOptional,
covOptional,
covOptional);
}

olMail.SetSubject(is_mailSubject);

if(lb_outlookOpen)
  olMail.Display(COleVariant((short)FALSE));
else
{
  BeginWaitCursor();
  olMail.Display(COleVariant((short)TRUE));
  EndWaitCursor();
}

if(!lb_outlookOpen) olApp.Quit();

myAttachments.DetachDispatch();
myAttachments.ReleaseDispatch();
olMail.DetachDispatch();
olMail.ReleaseDispatch();
olApp.DetachDispatch();
olApp.ReleaseDispatch();