1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
   | using namespace Microsoft::Office::Interop;
 
 
// Start Outlook.
// If it is already running, you'll use the same instance...
	Outlook::_Application olApp;
	COleException e;
 
if(!olApp.CreateDispatch("Outlook.Application", &e))
{
	CString str;
	str.Format("CreateDispatch() failed w/error 0x%08lx", e.m_sc);
	AfxMessageBox(str, MB_SETFOREGROUND);
	return;
}
 
// Logon. Doesn't hurt if you are already running and logged on...
	NameSpace olNs(olApp.GetNamespace("MAPI"));
	COleVariant covOptional((long)DISP_E_PARAMNOTFOUND, VT_ERROR);
	olNs.Logon(covOptional, covOptional, covOptional, covOptional); | 
Partager