استفاده از ديتاست در گزارش

[fereshtehrahimi]

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

[sepehr.net]

اگه گزارش با کریستال ریپورت میگیرید به صورت زیر

Dim Rpt As New CrystalReport 

Dim RepPath As String

        RepPath = Application.StartupPath

        RepPath &= "\CrystalReport1.rpt"

        da = New SqlDataAdapter(Strsql, strcon)

        ds = New DataSet

        da.Fill(ds)

        CrystalReportViewer1.ReportSource = Rpt

        CryUse.SetDataSource(ds.Tables(0))

        ds.Clear()

        da.Dispose()

[sepehr.net]

Dim Rpt As New CrystalReport 

Dim RepPath As String

RepPath = Application.StartupPath

RepPath &= "\CrystalReport1.rpt"

da = New SqlDataAdapter(Strsql, strcon)

ds = New DataSet

da.Fill(ds)

CrystalReportViewer1.ReportSource = Rpt

CryUse.SetDataSource(ds.Tables(0))

ds.Clear()

da.Dispose()

[fereshtehrahimi]

دو ست عزیز
من از کدی که گذاشته بودید استفاده کردم اما هیچ مقداری را در گزارش نشون نمی دهد
من از این دستور استفاده می کنم
select sum(a, sum (b, from tablef