Crystal Rep 9, VB 6.0 and Access 2000 Problem

[jake007]

Obviously using the above.

Coded the following

Public crApp As New CRAXDRT.Application
Public crRpt As CRAXDRT.Report


Private Sub cmdPrint_Click()

Dim crTable As CRAXDRT.DatabaseTable
Set crRpt = crApp.OpenReport("c:\Willson International\Report1.rpt&quot
Set crTable = crRpt.Database.Tables.Item(1)
crTable.SetLogOnInfo "c:\Willson Internation\Crossdock.mdb"
CRViewer91.ReportSource = crRpt
CRViewer91.ViewReport

End Sub

When running, get the following error


Run Time Error '-2147206429 (80043ae3)'
Invalid TLV Record

Debug shows the following line having the problem:

Set crRpt = crApp.OpenReport("c:\Willson International\Report1.rpt&quot

Any help would be appreciated.

Jake

 

[jake007]

Ok, got by that one, now getting

Error 424, Object Required

On Line :

CRViewer91.ReportSource = crRpt


Thanks.

jake