Help opening a Crystal Report (v10.0) VB6.0

[kchisley]

My code is:

Sub OpenReport()
 
   Dim CR_CustomApp As New CRAXDRT.Application
   Dim CR_CustomReport As CRAXDRT.Report
          
   
   Set CR_CustomReport = CR_CustomApp.OpenReport("c:\test.rpt", 1)
 
   End Sub

When I run it, it completes, but the report is not opened. Any suggestions please?