منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
كيفية اضافة Header and footer and some images for PrintDocument - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم مقالات التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=80)
+--- الموضوع : كيفية اضافة Header and footer and some images for PrintDocument (/showthread.php?tid=23065)

الصفحات: 1 2

RE: كيفية اضافة Header and footer and some images for PrintDocument - طالب برمجة - 05-01-18

إربط الداتاجريد بالجدول الذي داخل الداتاست عن طريق السهم الصغير الذي يظهر في ركن الداتاجريد ثم تختار الجدول من Choose Data Source

RE: كيفية اضافة Header and footer and some images for PrintDocument - sirnon - 05-01-18

الحمد لله استطيع ربط الreport viewer بالداتا سيت
انا اريد كود الربط ونقل البيانات من ال داتا جريد فيو الى الداتا السيت التى انشاتها
وشكراً

RE: كيفية اضافة Header and footer and some images for PrintDocument - طالب برمجة - 05-01-18

موضوعك بسيط جدا
والحل في مشاركتي السابقة

RE: كيفية اضافة Header and footer and some images for PrintDocument - sirnon - 05-01-18

وجدت هذا الكود هل يصلح
كود :
Private Function dgridViewTods(ByVal dgv As DataGridView) As DataSet
   Dim ds As New DataSet
   Try
        ' Add Table
        ds.Tables.Add("Invoices")

        ' Add Columns
        Dim col As DataColumn
        For Each dgvCol As DataGridViewColumn In dgv.Columns
              col = New DataColumn(dgvCol.Name)
              ds.Tables("Invoices").Columns.Add(col)
        Next

        'Add Rows from the datagridview
        Dim row As DataRow
        Dim colcount As Integer = dgv.Columns.Count - 1
        For i As Integer = 0 To dgv.Rows.Count - 1
             row = ds.Tables("Invoices").Rows.Add
             For Each column As DataGridViewColumn In dgv.Columns
                 row.Item(column.Index) = dgv.Rows.Item(i).Cells(column.Index).Value
             Next
        Next

        Return ds

   Catch ex As Exception

        MsgBox("CRITICAL ERROR : Exception caught while converting dataGridView to DataSet (dgvtods).. " & Chr(10) & ex.Message)
        Return Nothing
   End Try
End Function


RE: كيفية اضافة Header and footer and some images for PrintDocument - طالب برمجة - 05-01-18

للمرة الأخيررررررررررة في هذا الموضوع
الحل في مشاركتي السابقة وبدون أكواد

RE: كيفية اضافة Header and footer and some images for PrintDocument - sirnon - 05-01-18

اسف على الاطالة
واعذرنى على كثرة الاسئلة
وربنا يكرمك

RE: كيفية اضافة Header and footer and some images for PrintDocument - sirnon - 12-02-18

اخى طالب برمجة 
اريد منك مساعدة فى تطوير البرنامج