thefletch80
Programmer
I'm having a problem with my data displaying or being read. I'm not sure because i don't get any run time error.
What I do is create report (.rpt) file using a data definition file (.ttx). I create my report with crystal report for peachtree software and save it to my visual basic 6 project directory. After I fill the dataset in my program intialize the crystal report objects (Application, Report) and give the report object to the viewer's. The report is saved as GeneralJournal.rpt.
--------------------------------------------
'initialize objects contained in a module
Global GeneralJournal As ADODB.Recordset
Global CRApplication As CRAXDRT.Application
Global CRReport As CRAXDRT.Report
--------------------------------------------
'create initialize report
reports source (in code below):
Set CRApplication = New CRAXDRT.Application
Set CRReport = CRApplication.OpenReport("GeneralJournal.rpt"
CRReport.Database.Tables(1).SetDataSource GeneralJournal, 3
CRViewer1.ReportSource = CRReport
CRViewer1.ViewReport
-----------------------end of code-------------------
I am 100 percent sure the recordset actually contains data before it is given to the datasource
What I do is create report (.rpt) file using a data definition file (.ttx). I create my report with crystal report for peachtree software and save it to my visual basic 6 project directory. After I fill the dataset in my program intialize the crystal report objects (Application, Report) and give the report object to the viewer's. The report is saved as GeneralJournal.rpt.
--------------------------------------------
'initialize objects contained in a module
Global GeneralJournal As ADODB.Recordset
Global CRApplication As CRAXDRT.Application
Global CRReport As CRAXDRT.Report
--------------------------------------------
'create initialize report
reports source (in code below):
Set CRApplication = New CRAXDRT.Application
Set CRReport = CRApplication.OpenReport("GeneralJournal.rpt"
CRReport.Database.Tables(1).SetDataSource GeneralJournal, 3
CRViewer1.ReportSource = CRReport
CRViewer1.ViewReport
-----------------------end of code-------------------
I am 100 percent sure the recordset actually contains data before it is given to the datasource