In this article, I am going to demonstrate different email techniques that can be used in AX 4.0. Following classes can be used to send an email
Configure the SMTP server
http://www.vsysad.com/2014/01/configure-iis-smtp-server-to-use-gmail-to-forward-messages/
http://gaurangpatel.net/setting-up-smtp-server-in-windows-to-use-gmail
https://fmuntean.wordpress.com/2008/10/26/how-to-configure-iis-smtp-server-to-forward-emails-using-a-gmail-account/
http://www.blackbaudknowhow.com/tech-tips/how-to-install-and-configure-smtp.htm
- Mapi and its related classes
- SysMailer
- SysInetMail
- SysEmailBatch
- SmmOutlookEmail
SysEmailBatch:
SysEmailBatch internally uses SysMailer class and is used to send emails in batch. That is this class is batchable. Here is a small example for the class
static void emailThruSysEmailBatch(Args _args)
{
SysEmailBatch batch = new SysEmailBatch();
;
batch.parmSenderAddr("aslam.p@XYS.net");
batch.parmEmailAddr("aslam.p@p@XYS.net");
batch.parmMessageBody("Hi There");
batch.parmSubject("Test mail");
batch.run();
info('Done');
}
SysMailer:
In the following code you can see how to use SysMailer class for sending mails. To use SysMailer class you need to set Relay server or computer name, user name and password in Administration –> Setup –> Email parameters form. This class internally uses CDO.Message dll for communication purposes. Please note in AX 3.0 SysMailer uses Dundas.Mailer dll for communication.
static void emailThruSysMailer(Args _args)
{
SysMailer mailer = new SysMailer();
SysEmailParameters parameters = SysEmailParameters::find();
;
if (parameters.SMTPRelayServerName)
{
mailer.SMTPRelayServer(parameters.SMTPRelayServerName,
parameters.SMTPPortNumber,
parameters.SMTPUserName,
SysEmailParameters::password(),
parameters.NTLM);
}
else
{
mailer.SMTPRelayServer(parameters.SMTPServerIPAddress,
parameters.SMTPPortNumber,
parameters.SMTPUserName,
SysEmailParameters::password(),
parameters.NTLM);
}
mailer.fromAddress("aslam.p@XYZ.net");
mailer.tos().appendAddress("aslam.p@XYZ.net");
// mailer.body("hi");
mailer.sendMail();
info('Done');
}
static void Email(Args _args)
{
str ToAddress = "aslam.p@infotech.net";
str FromAddress = "aslam.p@infotech.net";
str Subject = "Journal not posted";
str Body ;
str FileToAttach = 'C:\\Users\\aslam.p\\Desktop\\Report AX 2012, data processing_files\\A.Txt';//
SysMailer mailer = new SysMailer();
;
Body = "<B>Body of the email</B>";
mailer.quickSend(fromaddress,toaddress,subject,body,toaddress,FileToAttach);
info("Done");
}
static void EmailsendwithAttachment(Args _args)
{
Args args;
ReportRun rr;
str reportName = "Report2";
str myPath,pdfFileName;
str ToAddress = "aslam.p@infotech.net";
str FromAddress = "aslam.p@infotech.net";
str Subject = "Journal not posted";
str Body,messageBody ;
SysMailer mailer = new SysMailer();
;
messageBody = "<p>Dear All,</p><P> Please find the errors in ledger journal report attached.</p>";
messageBody += "<p><font size=3 face=Garamond>Regards,</font></p><p><strong><font size=3 face=Garamond>AX Admin</font></strong></p>";
messageBody += "<p><strong><font size=3 face=Garamond>Microsoft Dynamics AX</font></strong></p>";
messageBody += "<p><strong><font color=#808080 size=3 face=Tahoma>Hospital</font></strong></p>";
body = strfmt("%1",messageBody);
startLengthyOperation();
args = new Args(reportName);
args.caller(rr);
rr = new reportRun(args);
rr.query().interactive(false);
rr.report().interactive(false);
rr.setTarget(printMedium::File);
rr.printJobSettings().setTarget(PrintMedium::File);
rr.printJobSettings().preferredTarget(PrintMedium::File);
rr.printJobSettings().format(PrintFormat::PDF);
rr.printJobSettings().warnIfFileExists(false);
rr.printJobSettings().suppressScalingMessage(true);
pdfFileName = @"C:\\Users\\aslam.p\\Desktop\\Report1.pdf";
rr.printJobSettings().fileName(pdfFileName);
rr.init();
rr.run();
endLengthyOperation();
info("Report hasbeen saved");
mailer.quickSend(fromaddress,toaddress,subject,body,toaddress,pdfFileName);
info("Done");
}
static void email(Args _args)
{
// For email notification
str messageBody;
NWH_XmlImpErrorFlag XmlImpErrorFlag;
InteropPermission permission = new InteropPermission(InteropKind::ComInterop);
SysMailer mailer;
str Body;
str ToAddress;
str FromAddress = "aslam.pasha@infotech.net";
str Subject = "Integration Alerts";
int x;
H_IntegrationParameters parameters;
Container id;
LedgerJournalTrans ljt;
date checkdate;
Real CheckDr , CheckCr ;
int i,j;
;
try
{
info("In the 'try' block. (j1)");
info("infolog!");
throw warning("test warning");
throw error("test error");
info("infolog!");
throw warning("test warning");
//throw Exception::Error;
}
catch
{
for (i=1; i<=infolog.line(); i++)
{
messageBody = ":" + infolog.text(i);
}
parameters = H_IntegrationParameters::find();
id = str2con(parameters.HSEmailId,",");
for(x=1 ; x <= conlen(id); x++ )
{
toaddress = strRem(conpeek(id,x)," ");
Body = strfmt("%1", messageBody) ;
CodeAccessPermission::revertAssert();
permission.assert();
mailer = new SysMailer();
// CodeAccessPermission::revertAssert();
mailer.quickSend(fromaddress,toaddress,subject,Body);
}
}
}
void NormalEmailSend()
{
str FromAddress = "XYZ.p@test.net";
str ToAddress = "XYZ.p@test.net,XYu.p@test.net";
str Subject = "Journals Posted successfully";
str Body,messageBody ;
SysMailer mailer = new SysMailer();
;
messageBody = "<p>Dear All,</p><P> All journal has been posted successfully.</p>";
messageBody += "<p><font size=3 face=Garamond>Regards,</font></p><p><strong><font size=3 face=Garamond>AX Admin</font></strong></p>";
messageBody += "<p><strong><font size=3 face=Garamond>Microsoft Dynamics AX</font></strong></p>";
messageBody += "<p><strong><font color=#808080 size=3 face=Tahoma>Women's </font></strong></p>";
body = strfmt("%1",messageBody);
mailer.quickSend(fromaddress,toaddress,subject,body,toaddress);
info("Normal Email send -Done");
}
https://sumitsaxfactor.wordpress.com/2008/09/09/email-techniques-in-ax-4-0/
