1 >
'resultset типа rdoResultset - через доводка, я подтверждал данные по resultset правильн заселены rs = rdoDbConn.OpenResultset (someSqlStatement, rdOpenKeyset) Me.Database.DiscardSavedData Class= " ясным " >And Me.Database.SetDataSource rs
Тусклое aRpt как IReport Тусклое boAbort как булевско boAbort = ложно aRpt = новое rptObject () boAbort aRpt.ReportInit CRViewerMain.ReportSource = aRpt Class= " ясное " >As, котор я упомянул, индикации CRViewerMain.ViewReport
Тусклый rpt как CRAXDDRT.Report Тусклый app как CRAXDDRT.Application rs = rdoDbConn.OpenResultset (someSqlStatement, rdOpenKeyset) rpt = app.OpenReport («reportpath/report.rpt») rpt.DiscardSavedData rpt. Database.Datasource = rs CRViewerMain.ReportSource = rpt Class= " ясное " >Am iий CRViewerMain.ViewReport