By using this site, you agree to our updated Privacy Policy and our Terms of Use. Manage your Cookies Settings.
448,893 Members | 1,695 Online
Bytes IT Community
+ Ask a Question
Need help? Post your question and get tips & solutions from a community of 448,893 IT Pros & Developers. It's quick & easy.

NullReferenceException when binding to crystalReportViewer.ReportSource

P: n/a

Thank you for yuour help.

I am using VS.NET 2003 with Crystal XI r2. I am getting
NullReferenceException at the following line in my code.
oRptForm.crystalReportViewer.ReportSource = oReport

I did bind the oDataset with a datagrid to make sure it has data and it
does show 2 tables with data.

Please help me with this.
Private Sub btnShowReport_Click(ByVal sender As System.Object, ByVal e
As System.EventArgs) Handles btnShowReport.Click

Dim oDataSet As New ProductivityDataSet()
Dim oReport As New Productivity()
Dim oProductivityReport As New
Dim oRptForm As ImmWinForms.ReportViewer

Status.ShowStatus("Generating Productivity Report...")
Me.Cursor = Cursors.WaitCursor

oProductivityReport.GetProductivityReport(oDataSet ,
dtpStartDate.Value, dtpEndDate.Value)
If oDataSet.Productivity.Rows.Count 0 Then
Status.ShowStatus("Loading Productivity Report...")
oReport.SummaryInfo.ReportTitle = "Productivity Report"
oReport.SummaryInfo.ReportComments = "Start Date: " &
dtpStartDate.Text & " End Date: " & dtpEndDate.Text
'Create the Report Form
oRptForm =

'Set the properties of the Report Form
oRptForm.Text = "Productivity Report"
oRptForm.crystalReportViewer.ShowCloseButton = False
oRptForm.crystalReportViewer.ShowGroupTreeButton =
oRptForm.crystalReportViewer.DisplayGroupTree = False
'oRptForm.crystalReportViewer.ReportSource = oReport
DataGrid1.DataSource = oDataSet

oRptForm.crystalReportViewer.ReportSource = oReport
Catch ex As NullReferenceException

End Try
'Me.Cursor = Cursors.Default
Me.Cursor = Cursors.Default
MessageBox.Show("There are no records to report on,
please adjust your query and try again", "Search Results",
MessageBoxButtons.OK, MessageBoxIcon.Information)
End If

End Sub
End Class

End Namespace

Aug 16 '06 #1
Share this question for a faster answer!
Share on Google+

This discussion thread is closed

Replies have been disabled for this discussion.