Job to create and sent outlook Tasks
AX integration project with
OUTLOOK where i have to create the Tasks from dynamics ax in outlook
static void
OutlookAppointment(Args _args)
{
COM sysOutlookCollection;
COM receipiants;
COM collection;
COMVariant comStartDate = new COMVariant();
COMVariant comEndDate = new
COMVariant();
COM c;
#SysOutLookCOMDEF
#define.mapi("MAPI")
#define.outlook("Outlook.Application")
COM sysOutlook;
COM sysOutlookNameSpace;
COM sysOutlookMAPIFolder;
sysOutlook = new
COM(#outlook);
sysOutlookNameSpace = sysOutlook.getNamespace(#mapi);
sysOutlookNameSpace.logon();
sysOutlookMAPIFolder = sysOutlookNameSpace.getDefaultFolder(#OlDefaultFolders_olFolderTasks);
collection = sysOutlookMAPIFolder.items();
c = collection.add();
comStartDate.date(today());
comStartDate.time(str2Time( "12:00:00"));
comEndDate.date(today());
comEndDate.time(str2Time( "12:45:00"));
c.subject("Meeting regd Microsoft Dynamics AX 2012");
c.body("Lets discuss on whats new in DAX 2012");
c.save();
if
(c)
{
receipiants =
c.Recipients();
receipiants.add("mukesh.jethwani@devitpl.com");
receipiants.ResolveAll();
c.assign();
//c.display();
c.send();
info("The action is created in Microsoft Outlook");
}
else
throw
error("@SYS31969");
sysOutlookNameSpace.logoff();
}
Thanks for comments.....