PDA

View Full Version : استفاده از ديتاست در گزارش



fereshtehrahimi
دوشنبه 30 اردیبهشت 1387, 17:17 عصر
سلام
چه طور مي تونم از ديتاستي كه درست كردم به وسيله كد نويسي گزارش بگيرم

sepehr.net
سه شنبه 31 اردیبهشت 1387, 00:22 صبح
اگه گزارش با کریستال ریپورت میگیرید به صورت زیر

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
سه شنبه 31 اردیبهشت 1387, 00:30 صبح
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
شنبه 11 خرداد 1387, 22:53 عصر
دو ست عزیز
من از کدی که گذاشته بودید استفاده کردم اما هیچ مقداری را در گزارش نشون نمی دهد
من از این دستور استفاده می کنم
select sum(a, sum (b, from tablef