Crystal Reports 9 (SOLVED)
Posted: Sun Sep 16, 2018 6:13 am
Hi Fivewin Experts,
I am using CR9 to display reports on my application, but now it is giving me an error:
Error occurred at: 09/16/18, 14:06:17
Error description: Error CrystalRuntime.Application.9/3 DISP_E_MEMBERNOTFOUND: OPENREPORT
Args:
[ 1] = C Test.rpt
Stack Calls
===========
Called from: => TOLEAUTO:OPENREPORT( 0 )
Called from: testcr9a.prg => MAIN( 10 )
The Crystal Report Application object was created but unable to find the function OpenReport, is there any other libraries I need to link or register? I have already registered the following dll:
regsvr32 craxdrt9.dll /s
regsvr32 crviewer9.dll /s
regsvr32 crqe.dll /s
regsvr32 crtslv.dll /s
regsvr32 ExportModeller.dll /s
Here is my test code:
#include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oCrystal := CreateObject( "CrystalRuntime.Application.9" )
LOCAL oReport
LOCAL oWnd, oCRViewer
Msginfo( oCrystal )
oReport := oCrystal:OpenReport( "Test.rpt" )
DEFINE WINDOW oWnd
oCRViewer = TActiveX():New( oWnd, "CRViewer9.CRViewer" )
oCRViewer:SetProp( "ReportSource", oReport )
oCRViewer:Do( "ViewReport" )
oWnd:oClient = oCRViewer
ACTIVATE WINDOW oWnd;
MAXIMIZED
RETURN NIL
Thanks and best regards,
ryu
I am using CR9 to display reports on my application, but now it is giving me an error:
Error occurred at: 09/16/18, 14:06:17
Error description: Error CrystalRuntime.Application.9/3 DISP_E_MEMBERNOTFOUND: OPENREPORT
Args:
[ 1] = C Test.rpt
Stack Calls
===========
Called from: => TOLEAUTO:OPENREPORT( 0 )
Called from: testcr9a.prg => MAIN( 10 )
The Crystal Report Application object was created but unable to find the function OpenReport, is there any other libraries I need to link or register? I have already registered the following dll:
regsvr32 craxdrt9.dll /s
regsvr32 crviewer9.dll /s
regsvr32 crqe.dll /s
regsvr32 crtslv.dll /s
regsvr32 ExportModeller.dll /s
Here is my test code:
#include "Fivewin.ch"
FUNCTION MAIN()
LOCAL oCrystal := CreateObject( "CrystalRuntime.Application.9" )
LOCAL oReport
LOCAL oWnd, oCRViewer
Msginfo( oCrystal )
oReport := oCrystal:OpenReport( "Test.rpt" )
DEFINE WINDOW oWnd
oCRViewer = TActiveX():New( oWnd, "CRViewer9.CRViewer" )
oCRViewer:SetProp( "ReportSource", oReport )
oCRViewer:Do( "ViewReport" )
oWnd:oClient = oCRViewer
ACTIVATE WINDOW oWnd;
MAXIMIZED
RETURN NIL
Thanks and best regards,
ryu