How to send by email pdf format

[colkas]

Hi

Could someone point me in the right direction.

I have made an email button from the wizard.... but what i want it to do is send the selected record (a quote) and sendr eport as PDF and to the named address email for that company contact.

Coiuld someone advise, this is the code thus far


stDocName = "Quotedem"
DoCmd.SendObject acReport, stDocName


I do have another bit of code that previews the report by type of Quote survey (see below) and this is waht needs to happen accept email instaed of preview report, so I have tried adapting it but no luck so far ....

stDocName = "quotedem"
DoCmd.OpenReport Combo38.Column(2), acPreview, , "type = '" & Combo38.Column(1) & "' AND IDquote = " & idquote


Thanks

 

[liddlem]

I presume that you will need some kind of third party software that converts the data to a PDF.

I know how to do this manually using CutePDF, but wouldnt have a clue how to generate to PDF before attaching to email.

In case you're interested in the manual method.
Download CutePDF and GhostScript (from Hippofile.com) and install.
Then PRINT your document to CutePDF - it will save as a PDF file.
Then attach the PDF to an email.
A bit cumbersome, I know, but it may be a viable option for you?

 

[colkas]

Hi

Thanks for the reply.

The main problem is to email the actual report with the record on screen presently... So if we have Quote number 1 on screen I only want to send the report with this record to the customer.... I can set the PDF in the formatpdf command within the code....

But thanks for the reply and idea...

 

[liddlem]

Hi Colkas. This could be done as suggested, but instead of sending data from the screen (ie user interface) - generate a report (from a button on screen) and send that?

 

[colkas]

Hi Liddlem

I am already doing that, from the quote the Email button the command behined it runs the report (see below)

stDocName = "Quotedem"
DoCmd.SendObject acReport, stDocName etc......

Thanks for your reply

 

[DCrake]

If you are using A2007 you can download the addin OutputToPDF from MS and use this functionality.

 

[colkas]

Hi

I am using A2010 and I now have the report working thanks with the DoCmd as below and it attaches the correct PDF report.... (just to work out how to grab the correct email address now...

DoCmd.SendObject acSendReport, Combo38.Column(2), acFormatPDF,Me.EmailTO, "type = '" & Combo38.Column(1) & "' AND IDquote = " & idquote

Thanks for the replies

 

[ted.martin]

You could also refer to the Post I just made in Macros section of this forum.

http://www.access-programmers.co.uk/forums/showthread.php?t=208462