Dynamics AX 2012: Job to create and sent outlook Tasks

Recently i got chance to work on AX integration project with OUTLOOK where i have to create the Tasks from dynamics ax in outlook and also email it to. check the job below that complete the requirements.

 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("test@microsoft.com");  
     receipiants.ResolveAll();  
     c.assign();  
     //c.display();  
     c.send();  
     info("The action is created in Microsoft Outlook");  
   }  
   else  
   throw error("@SYS31969");  
   sysOutlookNameSpace.logoff();  
 }  
%d bloggers like this: