SMTP Mail codeunit with SAVEASPDF

Alex_Chow · 2011-05-17

Hi,

I've created a process to automatically send an e-mail to each customer ship-to. The e-mail also has a report that I've created using the SAVEASPDF function so the report can be sent as an attachment.

I can send the e-mail without problems, but I can't attach the pdf file. The code I have written so far is:

ToFile := DELCHR(ShiptoAddress."Customer No." + FORMAT(WORKDATE),'=','/\:.,') + '.pdf';
FileName := TEMPORARYPATH + ToFile;
REPORT.SAVEASPDF(REPORT::"My Report",FileName,ShiptoAddress);
ToFile := ReportHelper.DownloadToClientFileName(FileName, ToFile);

<The code to write the send to, body, etc>

Mail.AddAttachment(ToFile);
Mail.Send();

The ReportHelper codeunit is from Claus' blog found here:
http://blogs.msdn.com/b/nav-reporting/a ... -2009.aspx

I checked codeunit 397 (Mail) that the blog is using. It seems to convert the link to the file with this code in the codeunit:

IF AttachFileName <> '' THEN BEGIN
  BSTRConverterAttachFileName.ResetBSTR;
  BSTRConverterAttachFileName.AppendNextStringPortion(AttachFileName);
  OAttachments := OSendMail.Attachments;
  OAttachment := OAttachments.Add(BSTRConverterAttachFileName);
END;

Does anyone know how I can add the attachment using SAVEASPDF using the SMTP Mail (codeunit 400) codeunit?

ara3n · 2011-05-17

I thought the SMTP automation is created at server, so you don't need to upload the pdf file. do everything at the server.

Alex_Chow · 2011-05-17

ara3n wrote:

I thought the SMTP automation is created at server, so you don't need to upload the pdf file. do everything at the server.

So do you mean:

ToFile := DELCHR(ShiptoAddress."Customer No." + FORMAT(WORKDATE),'=','/\:.,') + '.pdf';
FileName := TEMPORARYPATH + ToFile;
REPORT.SAVEASPDF(REPORT::"My Report",FileName,ShiptoAddress);

<The code to write the send to, body, etc>

Mail.AddAttachment(FileName);
Mail.Send();

Something like that?

Alex_Chow · 2011-05-17

Hmm... Doing that, I get the error saying that the caller does not have permission or the folder is read only.

Any suggestions?

ara3n · 2011-05-18

Give the service tier permission to the temp path, or make the user a local admin.

Alex_Chow · 2011-05-19

ara3n wrote:

Give the service tier permission to the temp path, or make the user a local admin.

For a Dynamics NAV MVP, you're pretty smart!

ara3n · 2011-05-19

hmmmm.

SMTP Mail codeunit with SAVEASPDF

Answers

Categories