To create a pdf from a record with a singular file name

[mercapto]

Hello, everyone.

My question has two parts:

First of all, I've been searching how to create a button that straightly generates a pdf from a report, without previewing and pressing the export button in the tool bar. Just to press a button in my form and cast the "save as" explorer. I found nothing...

Second, I want this output default filename not to be "REPORTNAME.PDF". I want to make this filename with the data in the record. E.g.: "ID_DATE_CLIENTNAME.pdf" .



Can anybody help me??

Thanks anyway

[ssanfu]

From this site: http://www.addictivetips.com/microso...cument-format/

Contrasting to Access 2007, in which you need to install add-ins to export database. Access 2010 offers option of exporting database in PDF (Portable Document Format) and XPS (XML paper Specification) formats. Now with Access 2010, you can export datasheet, Forms and Reports to a .pdf or .xps file, it enables you to spread information in an easy-to -distribute form that contains all formatting characteristics.

Don't know if this will work, but try:

'Behind a comand button save the report as PDF file 
Dim theFileName as string

theFileName = CurrentProject.Path &"\ID_" & Date & ".pdf"
DoCmd.OutputTo acOutputReport, "rptReportName", acFormatPDF, theFileName , False

Change "rptReportName" to your report name.....

[mercapto]

That's pretty good!! Thanks, ssanfu.

But...

Now I get a pdf of the whole report with all the records. I obviously need to filter by the Id of the record I am viewing. How can I do it? I tried with the syntax of the common report generating buttons and it didn't work.

[ssanfu]

And another question: how do I change the default saving directory. Now the file is defaultly saved in "Documents", I want to change that.

This site shows how to select a folder path. You would use it instead of "CurrentProject.Path"

Now I get a pdf of the whole report with all the records. I obviously need to filter by the Id of the record I am viewing.

I'm confused. You said you wanted to print a report as a PDF.
Are you now saying you want to just print one record?
Do yo mean a form instead of a report?

[mercapto]

This site shows how to select a folder path. You would use it instead of "CurrentProject.Path"


I'm confused. You said you wanted to print a report as a PDF.
Are you now saying you want to just print one record?
Do yo mean a form instead of a report?

Yes I want to print a report, but not with all the records in the database.
I.e: I use this:

DoCmd.OpenReport stDocName, acViewPreview, , "NumAnalisis = " & Nz(Me.NumAnalisis, 0)

*NumAnalisis is the ID.
to make a preview of only the record I am viewing.

Imagine I wanted to make a pdf of an invoice. With this code I will get all the invoices of my database in one pdf.

[mercapto]

No one knows how to automatically generate a pdf of a filtered-by-id report??

[ssanfu]

Does this code

DoCmd.OpenReport stDocName, acViewPreview, , "NumAnalisis = " & Nz(Me.NumAnalisis, 0)

open a report with just the record(s) related to "Me.NumAnalisis" or all records in the database?

[mercapto]

Does this code

DoCmd.OpenReport stDocName, acViewPreview, , "NumAnalisis = " & Nz(Me.NumAnalisis, 0)

open a report with just the record(s) related to "Me.NumAnalisis" or all records in the database?

This code opens JUST the record I am viewing. It takes the ID from the form (e.g. Id=73) and opens the report only with the record whose id=73.

[mercapto]

This works:

Me.Refresh
Dim myPath As String
Dim stDocName As String
Dim theFileName As String

stDocName = "Report Name"
DoCmd.OpenReport stDocName, acPreview, , "Id = " & Nz(Me.Id, 0)

myPath = "C:\..."
theFileName = "Report Id " & Id & ".pdf"

DoCmd.OutputTo acOutputReport, stDocName, acFormatPDF, theFileName, True

But I never succeeded saving in mypath, it always get saved in Documents.