تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
[سؤال] طباعة كل سجل في الجدول بصفحة
#1
السلام عليكم لدي جدول موظفين ومسجل بالبيانات
اسم الموظف والراتب
سؤال اريد ان اطبع هذه الجدول
كل سجل اي كل موظف في صفحة مع الحفاظ على نفس الهيدر الخاص بالطباعة هل ممكن ولكم الشكر
الرد }}}
تم الشكر بواسطة:
#2
السلام عليكم
ارجوا التوضيح
هل تريد كود طباعة الجدول مع طريقة فصل السجلات كل واحد في صفحة
او طريقة فصل السجلات كل واحد في صفحة فقط ؟
الرد }}}
تم الشكر بواسطة:
#3
عن طريق التمرير الحقول الى الكريستال ريبورت
الرد }}}
تم الشكر بواسطة:
#4
اذا ممكن مع العلم استخدم داتا جريد فيو
الرد }}}
تم الشكر بواسطة:
#5
انا استعمل تقرير بحث فيظهر في داتا جريد ويوجد تيكست فوق داتا جريد اريد ان يظهر في كل صفحة مع سجل واحد من داتا جريد
الرد }}}
تم الشكر بواسطة:
#6
ارفع مثالك .... ليتم مساعدتك
الرد }}}
تم الشكر بواسطة:
#7
السلام عليكم
هذا مثال ماخوذ من مشاركة مشكور الاخ الكريم على المشروع
انا ضفت 2تكست
وهناك خيار لطباعة الكل او فقط من سجلات داتا جريد
كيف يمكن طباعة كل سجل في صفحة ووضع صورة للخلفية
هل ممكن
لو سمحتم شرح الطريقة


الملفات المرفقة
.rar   Print DataGridview.rar (الحجم : 110.76 ك ب / التحميلات : 260)
الرد }}}
تم الشكر بواسطة:
#8
لم يتم الرد على سؤال اخونا محاسب يوسف

نتمنى ان يشاركنا الخبراء في هذا الموضوع للإستفاده
الرد }}}
تم الشكر بواسطة:
#9
السلام عليكم
انظر الى البرنامج المرفق وعدل علية حسب المطلوب
كود :
If DataTable1DataGridView.RowCount = 0 Then
                MessageBox.Show("لا يوجد بيانات للطباعة")
                Return
            End If
يمكنك تعديل من 0 الى -1 اذا كانت الداتا جرد مغلقة(اي لا يسمح بتعديل عليها كالاضافة والتعديل)
كود :
dt = New DataTable
            dt.TableName = "grid"
            dt.Columns.Clear()
            Dim first_name As DataColumn = New DataColumn("name")
            first_name.DataType = System.Type.GetType("System.String")
            dt.Columns.Add(first_name)
            Dim second_name As DataColumn = New DataColumn("phone")
            second_name.DataType = System.Type.GetType("System.String")
            dt.Columns.Add(second_name)
            Dim dr As DataRow
            Dim i As Integer
            For i = 0 To Me.DataTable1DataGridView.RowCount - 2
                dr = dt.Rows.Add
                'ملاحظة يجب ان يكون اسم الكولوم مشابة للموجود في الداتا سيت
                dr.Item("name") = Me.DataTable1DataGridView.Item(0, i).Value.ToString
                dr.Item("phone") = Me.DataTable1DataGridView.Item(1, i).Value.ToString
            Next i
لانشاء جدول مشابه للموجود في الداتا سيت(في هذا المثال هناك فقط 2كولوم)
وجلب البيانات من الداتا جرد
كود :
Dim e1 As New CrystalReport1
            e1.SetDataSource(dt)
            print.CrystalReportViewer1.ReportSource = e1
            print.CrystalReportViewer1.RefreshReport()
            print.ShowDialog()
لارسال الجدول السابق الى الكرستال ريبورت
وفتح فورم الطباعة الذي يحتوي على كريستال فيور
اما بخصوص طباعة كل سجل بصفحة
موجودة في الكرستال ريبورت وتتم بترك 24 سم اذا كانت A4
لاحظ الكرستال ريبورت


الملفات المرفقة
.zip   New WinRAR ZIP archive.zip (الحجم : 177.6 ك ب / التحميلات : 255)
الرد }}}
تم الشكر بواسطة: aftfm
#10
السلام عليكم ورحمة الله وبركاته

اخي العزيز yousef


إقتباس :اما بخصوص طباعة كل سجل بصفحة
موجودة في الكرستال ريبورت وتتم بترك 24 سم اذا كانت A4
لاحظ الكرستال ريبورت

هذا في حالة انني اريد طباعة فقط ما بداخل الداتا قريد

لكن لو كان لدي بضع البيانات في القريد والبعض الآخر في مربع نص أو اداة تاريخ أو Lable

وتظهر بيانات في القيد وباقي بيانات السجل في الادوات الأخرى للسجل الواحد

كيف تكون الطباعة كل سجل في صفحة
الرد }}}
تم الشكر بواسطة:


المواضيع المحتمل أن تكون متشابهة .
الموضوع : الكاتب الردود : المشاهدات : آخر رد
  كيف من الممكن طباعة كل سجل في صفحة مستقلة ( Report Viewer ) abomo3ath 2 812 24-09-23, 09:31 AM
آخر رد: abomo3ath
  طباعة داتا جريد في جدولين على الريبورت ahmed_elwerfalli 1 516 21-08-23, 05:53 PM
آخر رد: Taha Okla
  [سؤال] مشكلة في طباعة footer تقرير كريستال ريبورت i1982 5 1,124 29-03-23, 11:30 PM
آخر رد: sanyor77
  التحكم في عرض خطوط الجدول حسب شرط معين جيولوجي مبتدئ 0 741 24-06-22, 05:25 AM
آخر رد: جيولوجي مبتدئ
  طباعة بيانات من عدّة جداول عبد العزيز البسكري 2 2,397 19-07-21, 12:37 AM
آخر رد: Lathe1
  طباعة سجلات متعددة فى تقارير متعددة mr_hso 0 1,583 14-09-20, 06:09 PM
آخر رد: mr_hso
  لا استطيع طباعة التقرير bassant 6 2,566 09-06-20, 10:43 AM
آخر رد: bassant
  [VB.NET] طباعة كريستال ريبورت tahaayyoub 0 1,696 29-04-20, 04:11 AM
آخر رد: tahaayyoub
  [VB.NET] معالجة مشكل طباعة الفاتورة دون حفضها sniperjawadino 5 2,494 07-10-19, 12:39 PM
آخر رد: sniperjawadino
  [سؤال] ظهور خطأ no such interface عند طباعة صفحة word ويندوز windows 10 عبد الله 2 2,146 01-10-19, 03:41 AM
آخر رد: عبد الله

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم