problem with sub report in crystal reports.
Dear All,
I have to display 2 reports in VS2010 as one. So what I am using is sub-report. but the thing is I don't know how to display data from my db in the sub report. please see code below.
Code:
Dim rptdoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
rptdoc = New CrystalReport2 'main report
Dim rptdoc2 As CrystalDecisions.CrystalReports.Engine.ReportDocument
rptdoc2 = New CrystalReport3 'sub report
Dim localid As TextObject = rptdoc.ReportDefinition.ReportObjects("Text6")
localid.Text = DataGridView1.Item(0, i).Value.ToString 'textbox on main report
Dim localid2 As TextObject = rptdoc2.ReportDefinition.ReportObjects("Text13")
localid2.Text = DataGridView1.Item(0, i).Value.ToString 'textbox on sub report
Dim barcode As TextObject = rptdoc.ReportDefinition.ReportObjects("Text8")
barcode.Text = "*" & DataGridView1.Item(0, i).Value.ToString & "*"
Dim date1 As TextObject = rptdoc.ReportDefinition.ReportObjects("Text5")
date1.Text = Date.Now.ToShortDateString
objdataset = New DataSet
sqldataAdapter = New SqlDataAdapter
sqldataAdapter.SelectCommand = New SqlCommand
sqldataAdapter.SelectCommand.Connection = objconnection
sqldataAdapter.SelectCommand.CommandText = "Select NameAddofAdd from [" & cagenumber & "] where LocalID='" & DataGridView1.Item(0, i).Value.ToString & "'"
objconnection.Open()
sqldataAdapter.Fill(objdataset, cagenumber)
objconnection.Close()
Dim namenaddress As TextObject = rptdoc.ReportDefinition.ReportObjects("Text10")
namenaddress.Text = objdataset.Tables(0).Rows(0).Item(0).ToString
Dim f As New ViewPS94
f.CrystalReportViewer1.ReportSource = rptdoc
f.Show()
the data to be displayed on the textbox for the sub report is not appearing. please help guys.
thanks
ashley
Re: problem with sub report in crystal reports.
