I am moving a VB/ CR application from CR8.5 to CR10 and I am having trouble getting my reports to show correctly. It works in 8.5. I had to change my CRViewer.dll to use the one in crystalreportviewers10\ActiveXControls.
I am using ADODB.RecordSets for to hold my data. This is what my code looks like:
Dim repPeriodStats As New repFEPeriodicStatistics
Dim rsTransViewer As New ADODB.Recordset
Dim strTranViewsql As String
Dim ViewerformPeriodStats As New frmRecordViewer
strTranViewsql = myselect (too large to show here)
rsTransViewer.Open UCase$(Trim$(strTranViewsql)),
datcmd1.ActiveConnection,
adOpenDynamic, adLockPessimistic
repPeriodStats.Database.SetDataSource rsTransViewer
ViewerformPeriodStats.CRViewer1.ReportSource = repPeriodStats
Load ViewerformPeriodStats
ViewerformPeriodStats.Show vbModal
I get an error "Unable to move because the rowset is empty".
Do I need to adjust the code for the new CRViewer?
Any help would be greatly appreciated.
KellyTim
I am using ADODB.RecordSets for to hold my data. This is what my code looks like:
Dim repPeriodStats As New repFEPeriodicStatistics
Dim rsTransViewer As New ADODB.Recordset
Dim strTranViewsql As String
Dim ViewerformPeriodStats As New frmRecordViewer
strTranViewsql = myselect (too large to show here)
rsTransViewer.Open UCase$(Trim$(strTranViewsql)),
datcmd1.ActiveConnection,
adOpenDynamic, adLockPessimistic
repPeriodStats.Database.SetDataSource rsTransViewer
ViewerformPeriodStats.CRViewer1.ReportSource = repPeriodStats
Load ViewerformPeriodStats
ViewerformPeriodStats.Show vbModal
I get an error "Unable to move because the rowset is empty".
Do I need to adjust the code for the new CRViewer?
Any help would be greatly appreciated.
KellyTim