Как вывести отчет в формате PDF, где имя состоит из значений из полей?

Question

Я хочу добавить функциональность в свой отчет Access 2007, в результате чего PDF-копия отчета создается одним нажатием кнопки. Я знаю, что есть OutputTo макрос, который может сделать это для меня, но это не позволяет мне включать значения полей отчета как часть имени файла в формате PDF, а именно:

[Client Organisations].Code + "-" + Clients.Code + "-" + Invoices_Code + "-" + Format([Invoice Date],"yyyy") + ".pdf" 

В то время как я видел это MSDN thread и это SO question, я не вижу использования значений полей в любом из ответов.

Я считаю, VBA код путь, так что я (неудачно) попытался следующие:

Private Sub Create_PDF_Click() 
DoCmd.OutputTo acOutputReport, , acFormatPDF, "" + [Client Organisations].Code 
+ "-" + Clients.Code + "-" + Invoices_Code + "-" + Format([Invoice Date],"yyyy") 
+ ".pdf", True 
End Sub 

ошибка времени выполнения '2465':

Microsoft Office Access не может найти поле '|' упомянутый в вашем выражении

Любые идеи?

Answer 1

Я получил его на работу (в конце концов).

Следующая sub сделал трюк:

Private Sub Create_PDF_Click() 

Dim myPath As String 
Dim strReportName As String 

DoCmd.OpenReport "Invoices", acViewPreview 

myPath = "C:\Documents and Settings\" 
strReportName = Report_Invoices.[Client Organisations_Code] + "-" + 
Report_Invoices.Clients_Code + "-" + Report_Invoices.Invoices_Code + "-" + 
Format(Report_Invoices.[Invoice Date], "yyyy") + ".pdf" 

DoCmd.OutputTo acOutputReport, "", acFormatPDF, myPath + strReportName, True 
DoCmd.Close acReport, "Invoices" 

End Sub 

Два Предостережения:

1. потребности Отчет должен быть открыт перед печатью.
2. Обратитесь к полям с тем же именем, что и в отчете. То, что [Client Organisations].Code было [Client Organisations_Code] в отчете.

Answer 2

Его легче удалить строку и поместить туда все свое выражение, а затем отладить ее, чтобы увидеть, содержит ли оно действительное имя отчета.

Как это:

Dim strReportName as String 

strReportName = [Client Organisations].Code 
+ "-" + Clients.Code + "-" + Invoices_Code + "-" + Format([Invoice Date],"yyyy") 
+ ".pdf" 

//then try to print strReportName before you use DoCmd.OutputTo.