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

نسخة كاملة : طباعة تقرير بالريبورتير فيو
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
السلام عليكم...
انا عندي في شاشة الجرد في تقرير في كذا تيكست بيظهر وانا برنامجي عبارة عن برنامج تحاليل طيبية...
فلو عايز اطبع قيمة في الجدول المصمم بالريبورت فيو..
مثلا...عايز اطبع في جدول زي الشكل دا...
اسم الطبيب..
عدد الفحوصات:١٠٠ج.       اجمالي المبلغ:٢٠٠٠ج
اجمال المصاريف:٣٠٠ج .     الصافي:١٧٠٠ج
من تاريخ:     ١/١٢/٢٠١٨.      الي تاريخ:٣١/١٢/٢٠١٨
ودا كلة يكون في جدول من تصميمي في الريبورتير فيو..
من غير الاتصال طبعا باي قاعدة...
وارجو ان يكون هناك مثال للتوضيح..            
وشكرا..

(29-12-18, 02:05 PM)اسامه الهرماوي كتب : [ -> ]السلام عليكم...
انا عندي في شاشة الجرد في تقرير في كذا تيكست بيظهر وانا برنامجي عبارة عن برنامج تحاليل طيبية...
فلو عايز اطبع قيمة في الجدول المصمم بالريبورت فيو..
مثلا...عايز اطبع في جدول زي الشكل دا...
اسم الطبيب..
عدد الفحوصات:١٠٠ج.       اجمالي المبلغ:٢٠٠٠ج
اجمال المصاريف:٣٠٠ج .     الصافي:١٧٠٠ج
من تاريخ:     ١/١٢/٢٠١٨.      الي تاريخ:٣١/١٢/٢٠١٨
ودا كلة يكون في جدول من تصميمي في الريبورتير فيو..
من غير الاتصال طبعا باي قاعدة...
وارجو ان يكون هناك مثال للتوضيح..            
وشكرا..

وطباعا دا كلة من تيكست او ليبل
وعليكم السلام


أضف باراميتر في التقرير مع اختيار اسم مناسب له

هذا كود مثال مع التأكد من اسم الباراميتر
PHP كود :
Dim param1 As New ReportParameter("ReportParameter1"TextBox1.Text)

Me.ReportViewer1.LocalReport.SetParameters(param1)

Me.ReportViewer1.RefreshReport() 
(29-12-18, 02:30 PM)a.wagdi كتب : [ -> ]وعليكم السلام


أضف باراميتر في التقرير مع اختيار اسم مناسب له

هذا كود مثال مع التأكد من اسم الباراميتر
PHP كود :
Dim param1 As New ReportParameter("ReportParameter1"TextBox1.Text)

Me.ReportViewer1.LocalReport.SetParameters(param1)

Me.ReportViewer1.RefreshReport() 
لو امكن يعني مثال علي هذا الكود..
(29-12-18, 04:08 PM)اسامه الهرماوي كتب : [ -> ]
(29-12-18, 02:30 PM)a.wagdi كتب : [ -> ]وعليكم السلام


أضف باراميتر في التقرير مع اختيار اسم مناسب له

هذا كود مثال مع التأكد من اسم الباراميتر
PHP كود :
Dim param1 As New ReportParameter("ReportParameter1"TextBox1.Text)

Me.ReportViewer1.LocalReport.SetParameters(param1)

Me.ReportViewer1.RefreshReport() 
لو امكن يعني مثال علي هذا الكود..


حسنا تفضل المثال

مثلا اردت ان اسم المدرسة تريد ارساله للتقرير من التكيست
الخطوات:

افتح التقرير داخل الفيجوال
في Report Data عادة في الجهة اليسرى مثل صندوق الأدوات
إن لم تكن Report Data موجودة اذهب للقائمة View واختر منها Report Data أو إضغط Ctrl+Alt+D

تجد في Report Data الباراميترات Parameters اضغط علية زر يمين واختر Add Parameter
ضع اسم مناسب في Name وليكن SchoolName وتأكد النوع Type أن يكون Text وقم بتأشير كل من
("")Allow blank value وتعني السماح بالقيمة الفارغة
و
Allow null value وتعني السماح بدون قيمة

 ثم اضغط OK

الآن أصبح لديك باراميتر اسمه SchoolName
اسحبه بالماوس وضعه في المكان المناسب على التقرير

في كود الفيجوال بيسيك نفترض ان اسم المدرسة مكتوب داخل TextBox1
نقوم بتعريف ReportParameter وليكن اسمه schName ونعطيه اسم الباراميتر والقيمة المراد ارسالها له وهي هنا من TextBox1
ثم نضيفه للريبورت في SetParameters بهذه الطريقة
PHP كود :
Dim schName As New ReportParameter("SchoolName"TextBox1.Text)

Me.ReportViewer1.LocalReport.SetParameters(schName)

Me.ReportViewer1.RefreshReport() 

وهكذا في كل باراميتر تريد وضع قيمة له،

لا تنس أن Me.ReportViewer1.RefreshReport يكون في النهاية لإظهار النتيجة في مستعرض التقرير
مشكور اخي 
ممكن اعرف كيفية إظهار شاشة print louyt في وضع التكبير مباشرة عند الضغط على طباعة بدلا من إظهار الشاشة الرئيسية للتقرير
(29-12-18, 08:17 PM)alfaiz678 كتب : [ -> ]مشكور اخي 
ممكن اعرف كيفية إظهار شاشة print louyt في وضع التكبير مباشرة عند الضغط على طباعة بدلا من إظهار الشاشة الرئيسية للتقرير


العفو أخي الكريم

تفضل، ضع هذا السطر قبل سطر Me.ReportViewer1.RefreshReport
PHP كود :
Me.ReportViewer1.SetDisplayMode(DisplayMode.PrintLayout
جزاك الله خيرا ماقصرت
شكرا اخي a.wagdi..