ساب ريپورت

[majidsoft]

با سلام خدمت دوستان
من يك ريپورت ساختم كه از دو ساب ريپورت تشكيل شده است حال مي خواهم دو ساب ريپورت را مقداردهي كرده و از طريق ريپورت اصلي گزارش گيري كنم ولي هر كاري مي كنم فقط مقادير يكي از سابه در گزارش اصلي مي آيد من از اين كدها استفاده مي كنم
با تشكر


Dim da As SqlDataAdapter = New SqlDataAdapter("SELECT * from rest where (g1a =" & 1 & ") and (pri=" & 0 & ") and (rest=" & 1 & " or (rest=" & 2 & ")) ", Fn_Get_SqlConnection())
Dim ds As DataSet = New DataSet
da.Fill(ds, "rest") : Dim rpt As New cry : rpt.SetDataSource(ds)
frmreport.CrystalReportViewer1.ReportSource = rpt
Dim da1 As SqlDataAdapter = New SqlDataAdapter("SELECT * from rest where (g1a =" & 1 & ") and (pri=" & 0 & ") ", Fn_Get_SqlConnection())
Dim ds1 As DataSet = New DataSet
da1.Fill(ds1, "rest") : Dim rpt1 As New cry3 : rpt1.SetDataSource(ds1)
frmreport.CrystalReportViewer1.ReportSource = rpt1 : frmreport.Show()

[majidsoft]

نمی دونم سوالم واضح بود یا نه من یک ریپورت اصلی دارم که از دو ساب ریپورت تشکیل شده حال می خواهم با اجرای یک فرمان دو ساب ریپورت من مقدار دهی شوند و ریپورت اصلی نمایش داده شود