1

我在 Access 2007 SP3 中遇到了一个奇怪的问题。当我将报告导出为 pdf 时，我得到了我不想要的“输出到”提示，我的代码中有什么我做错了吗？

OverViewFile = DLookup("ExportPath", "dbo_Defaults") & "PC" & Format(Now(), "ddmmyy") & Format(Now(), "hhmm") & ".pdf"

DoCmd.OutputTo acOutputReport, "Rpt_ExportBPC", acFormatPDF, OverViewFile, False

如果我错过了什么，请告诉我。

4

1 回答 1

1

OutputTo在使用我的报告对象的名称调整您并为其提供OverViewFile的有效文件路径时，我没有从 Access 2007 SP3 中得到该提示。所以我怀疑你的问题是由于OverViewFile；检查该字符串的值：

OverViewFile = DLookup("ExportPath", "dbo_Defaults") & "PC" & Format(Now(), "ddmmyy") & Format(Now(), "hhmm") & ".pdf"
Debug.Print OverViewFile
DoCmd.OutputTo acOutputReport, "Rpt_ExportBPC", acFormatPDF, OverViewFile, False

Debug.Print您可以在“立即”窗口中查看输出（ Ctrl+g将带您到那里）。

也许DLookup正在返回 Null。然后，您将拥有OverViewFile的有效 VBA 字符串，但它不是有效的 Windows 路径。

OverViewFile的另一个问题可能不会导致问题，但我会建议这样做，因为它更简单，而且我认为您实际上希望文件名中包含 hhnn而不是hhmm（n代表分钟；m代表月）

OverViewFile = DLookup("ExportPath", "dbo_Defaults") & "PC" & _
    Format(Now(), "ddmmyyhhnn") & ".pdf"
于 2013-10-29T14:58:39.610 回答