// Steps to send Automatic appointment to Mail id by using outlook through X++
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( "10:40:00"));
comEndDate.date(today());
comEndDate.time(str2Time( "10: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(" Desired mail Id");
receipiants.ResolveAll();
c.assign();
//c.display();
c.send();
info("The action is created in Microsoft Outlook");
}
else
throw error("@SYS31969");
sysOutlookNameSpace.logoff();
}
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( "10:40:00"));
comEndDate.date(today());
comEndDate.time(str2Time( "10: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(" Desired mail Id");
receipiants.ResolveAll();
c.assign();
//c.display();
c.send();
info("The action is created in Microsoft Outlook");
}
else
throw error("@SYS31969");
sysOutlookNameSpace.logoff();
}
No comments:
Post a Comment