طباعة التقارير باستخادم Report Viewer

معقووووووووووول انا الشخص الوحيد بالعالم الي بستخدم ReportViewer و بعاني من هذه المشكلة

السلام عليكم

تفضل اخي هذا الرابط هنا سوف يساعدك لانه انا كانت نفس المشكله لدي

مسا الخير اخي الكريم انا غايتي طباهة محتوى التقرير ...

انا بقدر اطبع المحتوى على Internet Explorer

بس ما يقدر اعمل نفس الشي ع Firefox

الكود اللى اعطيتك هوا يسمح لك من اي متصفح

اخي الفاضل

اريد طباعة نتيجة البحث وتظهر النتيجة فى داتا جريد فيو

بعد كده عاوز اصدرها لـ Report Viewer

ارجو المساعدة

Dim MyDataSet As New DataSet

Dim MyDataTable As DataTable

Dim MyDataRow As DataRow

Dim i As Int16 = 0

Do While i < DataGridView1.Rows.Count

MyDataTable = MyDataSet.Tables("Mahala_Tour")

MyDataRow = MyDataTable.NewRow

MyDataRow(0) = DataGridView1.Rows(i).Cells(0).Value.ToString

MyDataRow(1) = DataGridView1.Rows(i).Cells(1).Value.ToString

MyDataRow(2) = DataGridView1.Rows(i).Cells(2).Value.ToString

MyDataRow(3) = DataGridView1.Rows(i).Cells(3).Value.ToString

MyDataRow(4) = DataGridView1.Rows(i).Cells(4).Value.ToString

MyDataTable.Rows.Add(MyDataRow)

i += 1

Loop

Dim Form5 As New FrmViewer

Dim cr1 As New ReportViewer()

cr1.Database.Tables(0).SetDataSource(MyDataSet)

Form5.ReportViewer1.ReportSource = cr1

Form5.Show()

End Sub

بيقف عند الأمر دا

MyDataRow = MyDataTable.NewRow

ارجو المساعدة

وهل هذا الكود صح ام خطأ