Неверная запись TLV VB 6.0 CR9

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. Я убедился, что все мои.dll для CR9 зарегистрированы. Отчет был построен с использованием отчетов CR9 и сохранен как таковой. CRAXDRT - это элемент управления ActiveX CR9 во время выполнения. Есть идеи?

Кроме того, это не проблема развертывания. Я работаю на той же машине, что и кодирование. Эта ошибка возникает при отладке исходного кода, а не при запуске исполняемого файла.

Answer 1

Ответом на эту проблему оказалось то, что мой файл CRAXDRT.dll для CR9 находился в папке Windows System32. Несмотря на то, что ссылка на VB 6.0 указывала на правильный.dll, что-то в этом было не так.

Я исправил ошибку, скопировав.dll в папку с остальными файлами CR9, C:\Program Files\Common Files\CrystalDecisions\2.0\bin, и перенаправил ссылку сюда, и она устранила ошибку.

Короче говоря, убедитесь, что ваш файл DLL находится в правильной папке с остальными файлами DLL.