نقل قول نوشته شده توسط sunrisesystem مشاهده تاپیک
ایکاش یه مثال از فست ریپورت بود
درود

ببینید نمونه سورس کدهایی که داخل ستاپ خود فست ریپورت هست بهترین منبع یادگیریش هست.

همچنین داخل سایت هیلتون اموزش فست ریپورت وجود داره...اما شما میتونید به جای فست ریپورت از استیمول هم استفاده کنید که اموزش های اون بیشتر هستش.

چند نمونه کد میزارم براتون امیدوارم کمکتون کند :

گزارش گیری مستقیم از دیتاگرید:

 Dim Report1 As Report = New Report()        Report1.Load(Application.StartupPath & "/Report-datagrid.frx")
Report1.RegisterData(DataGridView1.DataSource, "Table1")


'ارسال ساعت
Report1.SetParameterValue("Parameter1", txt_date.Text)


Report1.Show()


گزارش گیری از دیتابیس با دیتاست :

 Dim da As New OleDbDataAdapter        Dim ds As New DataSet
Dim strsql As String
Dim Report1 As Report = New Report()


connect.Open()
strsql = "select idnumber,namess,family,tell,mob from Table1"
da = New OleDbDataAdapter(strsql, connect)
da.Fill(ds, "Table1")
connect.Close()


Report1.RegisterData(ds.Tables(0), "Table1")




Report1.Load(Application.StartupPath & "/Report-datagrid.frx")


'ارسال ساعت
Report1.SetParameterValue("Parameter1", DateTimePickerX1.Text)


Report1.Show()


گزارش گیری از دیتابیس با دیتاتیبل :
 Dim da As New OleDbDataAdapter        Dim ds As New DataSet
Dim strsql As String
Dim dt As DataTable = New DataTable()


connect.Open()
strsql = "select idnumber,namess,family,tell,mob from Table1 Order By idnumber "
da = New OleDbDataAdapter(strsql, connect)
da.Fill(dt)
connect.Close()


Dim Report1 As Report = New Report()
Report1.Load(Application.StartupPath & "/Report-datagrid.frx")
Report1.RegisterData(dt, "Table1")


'ارسال ساعت
Report1.SetParameterValue("Parameter1", DateTimePickerX1.Text)


Report1.Show()