मैं पीडीएफ प्रारूप में एक रिपोर्ट कैसे आउटपुट कर सकता हूं, जहां नाम फ़ील्ड से मूल्यों का होता है?

Question

मैं अपनी एक्सेस 2007 रिपोर्ट में कार्यक्षमता जोड़ना चाहता हूं जिससे एक बटन के क्लिक पर रिपोर्ट की पीडीएफ प्रति बनाई गई हो। मैं जानता हूँ कि एक OutputTo मैक्रो जो मेरे लिए यह कर सकते हैं है कि वहाँ है, लेकिन यह मुझे रिपोर्ट फ़ील्ड मान पीडीएफ के फ़ाइल नाम का हिस्सा है, अर्थात् के रूप में शामिल करने के लिए अनुमति नहीं देता:

[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':

माइक्रोसॉफ्ट ऑफिस तक नहीं पहुँच सकता फ़ील्ड '|' ढूंढें आपकी अभिव्यक्ति में संदर्भित

वहां कोई विचार है?

Answer 1

मैं इसे (अंततः) काम करने के लिए मिला है।

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. रिपोर्ट की जरूरत है मुद्रण से पहले खोले जाने के लिए

   निम्नलिखित sub चाल किया था।

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.