Posted 4 August 2017, 3:00 pm EST
I intend to migrate from Crystal Reports and I would like to know how can I replicate the following scenario with Active Reports.
Please note that I am not using a designer or a viewer, all the report management is within a class
<FONT face="Courier New" size=2>Dim objApp As CRAXDRT.Application
Dim objReport As CRAXDRT.Report
Set objApp = New CRAXDRT.Application ' A helper object used below
Set objReport = objApp.OpenReport("C:\MyReport.rpt") ' Load a report layout from disk
.Database.SetDataSource objRecordset ' Asign the data as an ADO recordset
.PaperSize = crPaperUser ' Instead of a A4 or Letter papersize, use a customized one.
.SetUserPaperSize intLenght, intWidth ' set a custom papersize
.PrintOut ' print by code
Thanks a lot for your help