مشكل در گزارش گيري با ديتاست

[fereshtehrahimi]

سلام
من براي گزارش گيري از كد زير استفاده مي كنم كه اول نتيجه جستجو را در ديتاگريد بعد در گزارش نمايش دهد در ديتاگريد درست نمايش مي دهد ولي در گزارش تمام اطلاعات تيبل را نمايش مي دهد
چه طور اين مشكل را حل كنم

Dim dap1 As New SqlClient.SqlDataAdapter
Dim dset1 As New DataSet
Dim rpt As New CrystalReport2

Dim strcon As String = "Initial Catalog=emtiazekol;data source= localhost;integrated security=sspi;"

Dim sqltext As String = "SELECT ostan AS Expr1, SUM(em_khabar) AS Expr2, SUM(s_khabar) AS Expr3, SUM(em_tahlil) AS Expr4, SUM(s_tahli) AS Expr5, SUM(em_mamoriat) AS Expr6,SUM(s_mamoriat) AS Expr7 FROM tblcalculat where sal Like N'" & Combosal.Text & "%' and mah Like N'" & Combotarikh.Text & "%' GROUP BY ostan"
Dim con As New SqlConnection(strcon)

dap1.SelectCommand = New SqlClient.SqlCommand
dap1.SelectCommand.Connection = con

dset1.Dispose()
dset1 = New DataSet
dap1.SelectCommand.CommandText = sqltext
dset1.Clear()
dap1.Fill(dset1, "main_tlb")
DataGridView1.DataSource = dset1
DataGridView1.DataMember = "main_tlb"
rpt.SetDataSource(dset1)
CrystalReportViewer1.ReportSource = rpt

[baran_mehr]

سلام گلم.
خوب میتونی یک جدول برای نمایش گزارش درست کنی که فیلداری مورد نظرت رو داشته باشه.
و با یه دستور Select مقادیری رو که میخوای در کریستال نشون بده رو بر گردون و درون اون جدول بریز و بعد جدول رو به کریستال ارتباط بده
موفق باشی.