用X++代码实现自动发送mail

用X++代码实现自动发送mail

/*本源代码只适合Axapta 3.0版本，AX 2009有所不同*/

static void xyf_SendMail_AX3Version(Args _args){ SysEmailParameters parameters = SysEmailParameters::find(); sysMailer mailer = new sysmailer();; mailer.fromAddress(parameters.SMTPUserName);// 邮件服务器域下的发件邮箱地址? 发件人Mail地址 mailer.fromName("Axapta.Erp"); //发件人显示名称 mailer.tos().add("[e-mail]","谢宇帆"); //收件人地址 //It's maybe Loop Add Mail address mailer.ccs().add("[e-mail]","谢宇帆"); //抄送给该地址 mailer.bccs().add("[e-mail]","Jimmy"); //秘密抄送给该地址 try { mailer.subject("This is mail TopTic"); //邮件主题 AX3.0不支持中文 mailer.htmlBody("This is mail test........."); //邮件正文 AX3.0不支持中? // mailer.body("邮件正文.............."); //邮件正文 AX3.0不支持中? // mailer.attachments().add("c:/david/test.txt");//附件，我的路径格式是在VISTA下，所以用‘/’ mailer.attachments().add(@"//Ip地址/AxaptaUserData/某某.xls");//附件地址 mailer.SMTPRelayServers().add(SysEmailParameters::find().SMTPRelayServerName,//外发邮件服务器地址 SysEmailParameters::find().SMTPPortNumber, //SMTP 端口号 SysEmailParameters::find().SMTPServerIPAddress,//当前本地电脑Ip地址 SysEmailParameters::find().SMTPUserName, //用户名称 SysEmailParameters::find().SMTPPassword); //用户密码 mailer.sendMail(); } catch(Exception::Error) { throw Error("Axapta 自动发生mail出错啦！"); } info("Axapta Send Mail successfully!");}