Question

我目前收到错误：

无效的TLV记录

运行以下代码块时：

Private Sub PrinttoFile_Click()
    Dim crApp As CRAXDRT.Application
    Dim crRep As CRAXDRT.Report
    Set crApp = New CRAXDRT.Application
    Set crRep = crApp.OpenReport("C:\Documents and Settings\Administrator\Desktop\DansTest\Report3.rpt")
    '...code to set report parameters, login information etc...

    ExportReportToPDF crRep, "C:\Testing\ReportTest.pdf", "Beds Held"


End Sub

Set crRep = line出错。我确保CR9的所有.dll都已注册。该报告使用CR9报告构建并保存。 CRAXDRT是CR9运行时activeX控件。有什么想法吗？

此外，这不是部署问题。我正在和编码工作在同一台机器上。调试原始代码时会发生此错误，而不是在运行可执行文件时发生。

Answer 1

这个问题的答案原来是CR9的CRAXDRT.dll文件在Windows System32文件夹中。尽管VB 6.0中的引用指向了正确的.dll，但是有些错误。

我通过将.dll复制到包含其余CR9文件的文件夹C：\ Program Files \ Common Files \ CrystalDecisions \ 2.0 \ bin来修复错误，并在此重定向引用并解决错误。

简而言之，请确保您的dll文件与其他dll文件位于正确的文件夹中。

无效的TLV记录VB 6.0 CR9

1 个答案: