اخواني الكرام
عندي مشكله واتمنى المساعده
الان اخواني انا عندي فريم فيه اثنين داتا غريد فيو
واريد تحويلها الى تقرير
فقمت ببناء داتا سيت واضفت لها جدولين
وعبيت الجدولين من الداتا غريد فيو التى لدي بالكود التالي
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click Dim rptDS As New rptDataSet1 Dim NewDR As DataRow For intLoop1 As Integer = 0 To Me.DataGridView1.RowCount - 2 NewDR = rptDS.rptDt1.NewRow NewDR(0) = Me.DataGridView1.Item(0, intLoop1).Value NewDR(1) = Me.DataGridView1.Item(1, intLoop1).Value NewDR(2) = Me.DataGridView1.Item(2, intLoop1).Value NewDR(3) = Me.DataGridView1.Item(3, intLoop1).Value rptDS.rptDt1.Rows.Add(NewDR) Next '__________________________ Dim NewDR2 As DataRow For intLoop As Integer = 0 To Me.DataGridView2.RowCount - 2 NewDR2 = rptDS.rptDt2.NewRow NewDR2(0) = Me.DataGridView2.Item(0, intLoop).Value NewDR2(1) = Me.DataGridView2.Item(1, intLoop).Value NewDR2(2) = Me.DataGridView2.Item(2, intLoop).Value NewDR2(3) = Me.DataGridView2.Item(3, intLoop).Value NewDR2(4) = Me.DataGridView2.Item(4, intLoop).Value NewDR2(5) = Me.DataGridView2.Item(5, intLoop).Value rptDS.rptDt2.Rows.Add(NewDR2) Next Dim x As New Form Dim y As New CrystalDecisions.Windows.Forms.CrystalReportViewer Dim rpt As New Crt1 x.Controls.Add(y) x.WindowState = FormWindowState.Maximized y.Dock = DockStyle.Fill y.DisplayGroupTree = False y.ReportSource = rpt rpt.SetDataSource(rptDS) '_____________________ 'rpt.SummaryInfo.ReportComments = Form23.TextBox2.Text x.ShowDialog() End Sub
الان
عند تصميم التقرير وضعت الجدولين بجانب بعض
وعند تشغيل جدول واحد منها يشتغل صح
بس لما اشغل الجدولين يعمل الجدول الثاني بطريقه صحيحه
بينما الجدول الاول يقوم بتكرار كل سطر فيه على عدد الاسطر الموجوده في الجدول التاني
مع العلم انه ليس هناك علاقه بينهما وكل واحد في جدول مختلف عن الثاني
سوال كيف يتم عرض الجدولين في تقرير واحد دون ان يحدث تكرار للبيانات في الجدول الاول
يوجد في المرفقات صوره الصفحه عندما يكون جول واحد وعندما يكون جدولين (مع مشكله التكرار)
