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

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تنسيق استخدام الكريستال ريبورت (/showthread.php?tid=11418)



تنسيق استخدام الكريستال ريبورت - djelloul - 13-02-15

السلام عليكم ورحمة الله تعالى وبركاته
الإخوة الكرام
رجاءا عملت برنامج مبيعات  وأريد عند استخدام الكريستال ريبورت لا تظهر كل الفواتير على التقرير مرة واحدة بل أريد إظهار الفاتورة التي تم عملها مباشرة على النقر على زر حفظ الذي وضعته اي زر حفظ عملية البيع في قاعدة البيانات
ألف شكر


RE: تنسيق استخدام الكريستال ريبورت - العالمي - 15-02-15

هتعمل الاستعلام برقم الفاتوره الحاليه فقط وتربط بياناتها بالتقرير


RE: تنسيق استخدام الكريستال ريبورت - djelloul - 16-02-15

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


RE: تنسيق استخدام الكريستال ريبورت - الكاتب - 17-02-15

كود :
  Dim sql As String = " SELECT  * FROM Makzn where  NAMEMANTG=@NAMEMANTG"
               Dim comm As New SqlCommand(sql, Sqlconn)
               comm.Parameters.AddWithValue("@NAMEMANTG", Co.Text.Trim)
               Dim da As New SqlDataAdapter(comm)
               Dim dt As New DataTable
               da.Fill(dt)
                   Dim rpt As New Cry1
               rpt.SetDataSource(dt)
                   Form_REPORT.CrystalReportViewer1.ReportSource = rpt

كود :
Makzn
الجدول الذي به الفاتورة

كود :
NAMEMANTG

سجل الفاتورة

كود :
Co.Text.Trim

قيمة الاستعلام

كود :
Cry1

التقرير

كود :
Form_REPORT.CrystalReportViewer2

الفورم الذي به عارض التقارير

ثم اظهر الفورم نهاية الاجراء
كود :
Form_REPORT.show



RE: تنسيق استخدام الكريستال ريبورت - djelloul - 19-02-15

ألف شكر لك أخي الكريم
راح أجرب وإذا لم تشتغل ممكن أرسل لك المشروع ؟

ألف شكر لك مرة أخرى