[RESOLVED] Upgrade from CR8.5 to CR11

[anatasia]

Hi, there is an error
Line 13: Class CRVIEWERLibCtl.CRViewer of control CRViewer1 was not a loaded control class.
while i upgraded my CR to version 11 in VB 6.0


i applied - Crystal ActiveX Report Viewer Export Library 11.0
- Crystal ActiveX Report Viewer Library 11.0
- Crystal ActiveX Report Viewer Web Report Source Library 11.0
- Crystal Report ActiveX Designer Library 11.0

but it doesn't work. Pls help..

[Hack]

It sounds like you don't have Crystal Reports itself installed.

You need Crystal Reports installed in order to use the CRViewer control at design time.

[GaryMazzone]

The CRviewer changed from 8.5 to 11. You need to remove the 8.5 CRView Component and add the new CR11 component.

[anatasia]

First i uninstalled the 8.5 then installed 11 and reassigned components and references. But there is a "compile error: method or data member not found" while i debugging my system. Below is the codes:

Option Explicit
Public mRptReport As Report


Private Sub Form_Load()
Call FormStartUpPosition(Me, Me.height, Me.Width)
Screen.MousePointer = vbHourglass
CRViewer1.ReportSource = mRptReport *this is the effected line*
CRViewer1.PrintReport
CRViewer1.ViewReport
Screen.MousePointer = vbDefault
End Sub

[GaryMazzone]

When you removed the 8.5 component did you remove the CRViewier component on the form? The default name when you inset the CR11 Viewer is CrystalReportsViewer1 in CR8.5 it wasx CRViewer1

[anatasia]

Thanks Gary. but i have this run time error: Method 'PrintReport' of object 'ICrystalReportViewer11' Failed.
Did i missed up something in my coding?

Private Sub Form_Load()
Call FormStartUpPosition(Me, Me.height, Me.Width)
Screen.MousePointer = vbHourglass
CrystalActiveXReportViewer1.ReportSource = mRptReport
CrystalActiveXReportViewer1.PrintReport "effected line"
CrystalActiveXReportViewer1.ViewReport
Screen.MousePointer = vbDefault
End Sub

[anatasia]

I got error while i run my system to view and print reports "Run-time error: Basic syntax is not supported in group or record selection formula."

Public Sub ShowMonthlyReportCurOrderSynfab(ByVal blnPreview As Boolean, ByVal sID As String)
Dim CurOrderSynfabReport As Report
Dim Db As Database
Dim strTitle As String

Set CurOrderSynfabReport = New ICRCurOrderSynfab
Set Db = CurOrderSynfabReport.Database
CurOrderSynfabReport.RecordSelectionFormula = "{tbl_Posting.ID}=" & sID & " " effected line

Set frmCrystalViewer.mRptReport = CurOrderSynfabReport
frmCrystalViewer.Caption = strTitle & "Outstanding Order Report for Synfab Marketing"
frmCrystalViewer.Show 1
CurOrderSynfabReport.Export True

End Sub



Pls help on programming newbies. Thanks.