sinarahimpoor
یک شنبه 24 دی 1391, 16:37 عصر
سلام دوستان شرمنده مزاحم میشم مشکلی برای من پیش اومده
من سه تا فرم دارم در فرم اول کاربر اطلاعات رو وارد دیتا بیس (اکسس 2007) میکنه
در فرم دوم با دادن شماره سند سند در محیط گرافیکی باز گزاری میشه
در فرم دوم یک دکمه چاپ دارم که میخام با ReportViewer پرینت بگیرم (با کلیک با این دکمه فرم سومم لود میشه ومیخام بر خسب اون شماره سندی که تو فرم دوم بود گزارش بگیره)
تو فرم سومم یه ReportViewer با دیتا ست ها و ... موجوده
من برای دکمه پرینت فرم دومم کد زیر رو نوشتم اما تو مرحله اجرا ارور میه
Private Sub ButtonX3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX3.Click
preesghat.TableesghatTableAdapter.Connection = connect
preesghat.TableesghatTableAdapter.Fill(preesghat.D ataesghat.Tableesghat)
Dim paRMLIST As New List(Of ReportParameter)()
paRMLIST.Add(New ReportParameter("ID", DataGridView1.Item(0, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("Dateshasi", DataGridView1.Item(1, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("naghlie", DataGridView1.Item(2, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("tahvildahande", DataGridView1.Item(3, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("amval", DataGridView1.Item(4, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("rais", DataGridView1.Item(5, 0).Value.ToString))
preesghat.ReportViewer1.LocalReport.SetParameters( paRMLIST)
preesghat.ReportViewer1.RefreshReport()
preesghat.ShowDialog()
End Sub
اروری که دریافت میکنم
http://8pic.ir/images/vwl4hk586ym8cye8j1n.jpg
ممنون میشم راهنمایی کنید
من سه تا فرم دارم در فرم اول کاربر اطلاعات رو وارد دیتا بیس (اکسس 2007) میکنه
در فرم دوم با دادن شماره سند سند در محیط گرافیکی باز گزاری میشه
در فرم دوم یک دکمه چاپ دارم که میخام با ReportViewer پرینت بگیرم (با کلیک با این دکمه فرم سومم لود میشه ومیخام بر خسب اون شماره سندی که تو فرم دوم بود گزارش بگیره)
تو فرم سومم یه ReportViewer با دیتا ست ها و ... موجوده
من برای دکمه پرینت فرم دومم کد زیر رو نوشتم اما تو مرحله اجرا ارور میه
Private Sub ButtonX3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ButtonX3.Click
preesghat.TableesghatTableAdapter.Connection = connect
preesghat.TableesghatTableAdapter.Fill(preesghat.D ataesghat.Tableesghat)
Dim paRMLIST As New List(Of ReportParameter)()
paRMLIST.Add(New ReportParameter("ID", DataGridView1.Item(0, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("Dateshasi", DataGridView1.Item(1, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("naghlie", DataGridView1.Item(2, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("tahvildahande", DataGridView1.Item(3, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("amval", DataGridView1.Item(4, 0).Value.ToString))
paRMLIST.Add(New ReportParameter("rais", DataGridView1.Item(5, 0).Value.ToString))
preesghat.ReportViewer1.LocalReport.SetParameters( paRMLIST)
preesghat.ReportViewer1.RefreshReport()
preesghat.ShowDialog()
End Sub
اروری که دریافت میکنم
http://8pic.ir/images/vwl4hk586ym8cye8j1n.jpg
ممنون میشم راهنمایی کنید