LHendren
June 13th, 2011, 10:11 AM
Using VS 2010 with VB
I have a report that when sent to ReportViewer - Laboratory.ConcreteTestReportForm.Show()
prints the form text as well as the database data per the expressions given for each textbox. No problem, printed report is perfect.
However, when I print it directly to the printer (bypassing ReportView) - Laboratory.PrintReportModule.PrintTestReport.Main(), the form text prints fine, but the textboxes holding the database expressions are left blank.
Here is my Load DataSet Function:
Public Function LoadLIMSData() As DataTable
Dim dataSet As New DataSet()
dataSet.ReadXml("..\..\LIMSDataSet.xsd")
LoadLIMSData = dataSet.Tables(0)
End Function
And here is my Run Sub:
Public Sub Run()
Dim report As LocalReport = New LocalReport()
report.ReportPath = "..\..\TestReport.rdlc"
report.DataSources.Add(New ReportDataSource("LIMSDataSet", LoadLIMSData()))
Export(report)
m_currentPageIndex = 0
Print()
End Sub
It appears the dataset is not being read, but I cannot figure out why not.
I have a report that when sent to ReportViewer - Laboratory.ConcreteTestReportForm.Show()
prints the form text as well as the database data per the expressions given for each textbox. No problem, printed report is perfect.
However, when I print it directly to the printer (bypassing ReportView) - Laboratory.PrintReportModule.PrintTestReport.Main(), the form text prints fine, but the textboxes holding the database expressions are left blank.
Here is my Load DataSet Function:
Public Function LoadLIMSData() As DataTable
Dim dataSet As New DataSet()
dataSet.ReadXml("..\..\LIMSDataSet.xsd")
LoadLIMSData = dataSet.Tables(0)
End Function
And here is my Run Sub:
Public Sub Run()
Dim report As LocalReport = New LocalReport()
report.ReportPath = "..\..\TestReport.rdlc"
report.DataSources.Add(New ReportDataSource("LIMSDataSet", LoadLIMSData()))
Export(report)
m_currentPageIndex = 0
Print()
End Sub
It appears the dataset is not being read, but I cannot figure out why not.