گزارش گيري از گريدويو

[yeganehhr]

با سلام
برنامه اي دارم كه اطلاعات يه فايل xml رو توي يه گريدويو نمايش ميده و با جستجو توي گريدويو اين اطلاعاتو فيلتر ميشه. حالا من ميخوام اين اطلاعات فيلتر شده برحسب نامم رو توسط كريستال ريپورت نمايش و چاپ كنم اما كل اطلاعات داخل ديتاستم توي كريستال ريپورت وارد ميشه!!!!:ناراحت::ناراحت:
براي اينكه بتونم از اطلاعات توي گريدم(همون اطلاعات فيلتر شده ام:ناراحت:) گزارش بگيرم بايد چيكار كنم؟؟؟؟
ممنون:لبخندساده:
كدم اينه:

Dim Rpt As New Report
Dim d As New DataTable
d = Bind.DataSource
Rpt.Load("Report.rpt")
Rpt.SetDataSource(d)
frmprint.CRV.ReportSource = Rpt
frmprint.ShowDialog()

[mehdi.mousavi]

سلام.
خوب واضح هستش. کافیه تا اطلاعات فیلتر شده رو بصورت XML (یا هر قالب دیگه ای که Crystal Report پشتیانی میکنه) به CR بفرستید و گزارش رو تهیه کنید. شما احتمالا دارید همون Data Table یا DataView ای که از ابتدا اونو به Grid خودتون Bind کرده بودید رو به Crystal Report ارسال میکنید که چنین اتفاقی میفته. یه روش دیگه هم هستش، اونم اینکه با ارسال همون پارامتر Name به Crystal Report (http://bloggingabout.net/blogs/jschreuder/archive/2005/12/13/10533.aspx)، داده ها رو در Crystal Report فیلتر کرده، نمایش بدید.

طبیعتا روش اول بهتره، چون باعث نقل و انتقال داده کمتری بین برنامه شما و CR میشه.

موفق باشید.