1 de >
le 'resultset est de type rdoResultset - par l'élimination des imperfections, j'ai vérifié que les données de resultset sont correctement peuplées rs = rdoDbConn.OpenResultset (someSqlStatement, rdOpenKeyset) Me.Database.DiscardSavedData Le class= >
Faible aRpt comme IReport Faible boAbort comme booléen boAbort = faux aRpt = nouveau rptObject () boAbort d'aRpt.ReportInit CRViewerMain.ReportSource = aRpt Class= >
Faible RPT comme CRAXDDRT.Report Faible $$etAPP comme CRAXDDRT.Application rs = rdoDbConn.OpenResultset (someSqlStatement, rdOpenKeyset) RPT = app.OpenReport (« reportpath/report.rpt ») rpt.DiscardSavedData RPT. Database.Datasource = rs CRViewerMain.ReportSource = RPT Class= >