27-05-19, 11:44 PM
السلام عليكم ورحمة الله وبركاته
كل عام أنتم بخير
السؤال هو :- هل يمكن بمجرد الضغط علي زر الطباعة الذي انشئته علي الفورم يتم الطباعة بدون فتح مستعرض الكريستال
شكراً جزيلا للجميع وللقائمين علي هذا المنتدي الرائع
27-05-19, 11:44 PM
28-05-19, 02:34 AM
وعليكم السلام ورحمة الله وبركاته
كل عام وجميع الأمة الاسلامية بخير
ضع هذا الكود في حدث click لل button الخاص بالطباعة
قم بتغيير اسم الفورم واسم الكريستال ريبورت فيوار
تمنياتي لك وللجميع التوفيق
كل عام وجميع الأمة الاسلامية بخير
ضع هذا الكود في حدث click لل button الخاص بالطباعة
كود :
Form1.CrystalReportViewer1.PrintReport()تمنياتي لك وللجميع التوفيق
28-05-19, 02:50 AM
السلام عليكم و رحمة الله و بركاته
إضافة لما قدّمه الأخ الكريم بارك الله فيه و له ..
كمثال ..
إخترْ سطر واحد من السطرين الأخيريْن .. طباعة بعرض التقرير .. أو طباعة مباشرة بدون عرض التقرير
مع الإنتباه أنّ الرقم 1 .. الأوّل بالسطر .. يرمز إلى عدد الصفحات التي تريد طباعتها
كود :
Dim rpt1 As New CrystalReport1
Dim Frm As New Form2
Frm.CrystalReportViewer1.ReportSource = rpt1
'Frm.ShowDialog()
'rpt1.PrintToPrinter(1, True, 0, 0)تحياتي
31-05-19, 12:39 AM
بارك الله فيكم وجعله في ميزان حسناتكم
وجاري التجربة
وجاري التجربة
31-05-19, 01:15 AM
(27-05-19, 11:44 PM)abu.hanen4u كتب : [ -> ]السلام عليكم ورحمة الله وبركاتهكل عام أنتم بخيرالسؤال هو :-
هل يمكن بمجرد الضغط علي زر الطباعة الذي انشئته علي الفورم يتم الطباعة بدون فتح مستعرض الكريستال
شكراً جزيلا للجميع وللقائمين علي هذا المنتدي الرائع
طلبك موجود في المشاركه رقم 2 من الموضوع التالي
http://vb4arb.com/vb/showthread.php?tid=...#pid141502