Code to save report in pdf to a particular folder

[Ashfaque]

hi,

I know how to create my report into the pdf format with below line.

DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, , , , , acExportQualityPrint

But I don't know how to save in a particular folder that I created on my D:\MyFolder with its report number (that may be a record number of report) and if the same report (identify with RectNo field in it) is already saved then ask for overwrite.

Any idea?

Ashfaque

 

[John Big Booty]

Try;

DoCmd.OutputTo acOutputReport, "D:\MyFolder\R_RptByRevdDate", acFormatPDF, , , , , acExportQualityPrint

 

[Ashfaque]

No...

My forlder in D: drive is 'M' and when I place below;
It is opening a dialog box to save it by below name which I dont want.

D__M_R_RptByRevdDate

What I want is to save my report R_RptByRevdDate in pdf format in M folder located in D:\ drive.

Tnx

 

[Ashfaque]

Further, I want it to save it directly in the folder.

 

[Ashfaque]

Thanks,

I reached upto below and get success

DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, _
"D:\M\R_RptByRevdDate.pdf", False

My report is being generated with date criteria (From - To) inputed in TxtFrom & TxtTo boxes on form F_ReportMaster. Now I want my report name to be as From-To date range something like 100212-120212 based on the date selected on the form F_ReportMaster.

Is it possible?

Thanks,

 

[Kiwiman]

Howzit

Try something like...

Dims sFPath as string

sFPath = "D\M\R_RptByRevdDate & format(me.TxtFrom,"ddmmyy")
sFPath = sFPath & "-" & format(me.txtTo,"ddmmyy") & ".pdf"


DoCmd.OutputTo acOutputReport, "R_RptByRevdDate", acFormatPDF, _
sFPath,False

 

[murtazakhambaty]

Hi

I am writing the following code but its keeps on giving error. Can you please help.

Private Sub ReporttoPDF_Click()

Dim sFPath As String

sFPath = "D:\Adobe Documents\Quotation\ & Me.QuotationID & Me.QuotationYear & " --- " & Me.Company & " - " & Me.BACity"
sFPath = sFPath & Me.QuotationID & Me.QuotationYear & " ---" & Me.Company & " - " & Me.BACity & ".pdf"

DoCmd.OutputTo acOutputReport, "", acFormatPDF, sFPath, False

End Sub

I want my PDF file to save as follows:

RPL-PPH10000-2014 --- ABC-City.pdf