当我尝试在 VB6 中将水晶报告 8.5 导出为 PDF 时，出现错误“找不到文件”答案

【问题标题】：I'm getting error "File Not Found" when i try to export crystal report 8.5 to PDF in VB6当我尝试在 VB6 中将水晶报告 8.5 导出为 PDF 时，出现错误“找不到文件”
【发布时间】：2021-03-21 15:21:15
【问题描述】：

Dim crp As New CRAXDRT.Application
Dim rep As CRAXDRT.Report

Set rep = crp.OpenReport(GlbRepPath + "indent_rep.RPT")

rep.ExportOptions.Reset
rep.EnableParameterPrompting = False
rep.DiscardSavedData
rep.ExportOptions.PDFExportAllPages = True

rep.RecordSelectionFormula = "{I_IndentheadT.IND_NO}='" + txtIndentNo.Text + "'"

vFileName = Left(txtIndentNo.Text, 3) + Right(txtIndentNo.Text, 6) + ".pdf"

rep.ExportOptions.DiskFileName = "d:\indent.pdf" 'App.Path & "\" & vFileName

rep.ExportOptions.DestinationType = crEDTDiskFile
rep.ExportOptions.FormatType = crEFTPortableDocFormat

rep.DisplayProgressDialog = False
rep.Export False

我的代码用于将水晶报表从 VB6 转换为 pdf。最后一行给出错误“找不到文件”

【问题讨论】：

尝试使用不同的文件位置或将最后一行代码更改为 rep.Export True 看看会发生什么。
感谢史密斯您的及时回复。我都试过了，但同样的错误。
GlbRepPath 的值是多少？您确定该值以反斜杠结尾吗？
是的，它以反斜杠结尾

标签： pdf crystal-reports vb6

【解决方案1】：

缺少的文件可能是 CR 用于 PDF 导出的一些文件。检查这些文件是否存在：

C:\Program Files (x86)\Common Files\Crystal Decisions\2.0\bin\crtslv.dll
C:\Program Files (x86)\Common Files\Crystal Decisions\2.0\bin\ExportModeller.dll
C:\WINDOWS\Crystal\crxf_pdf.dll

【讨论】：

亲爱的史密斯，我必须对电脑进行比较，一台是 XP，另一台是 Win10。在这两个我都有水晶报表 8.5。所以我没有水晶决定或水晶文件夹。
我尝试使用 Export True，但同样的错误。
如果您的代码在 Win XP 上运行良好，并且在 Win 10 上弹出“找不到文件”错误，请将整个文件夹 C:\WINDOWS\Crystal 从 Win XP 复制到 Win 10 机器并尝试 pdf 导出.
进程监视器是解决各种问题的好工具。看看stackoverflow.com/questions/59463345/… 使用您的应用程序名称而不是 regsvr32.exe。
当我从 Crystal Report 导出为 pdf 时，它可以工作，但它不适用于 VB 代码。