+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=71)
+--- الموضوع : استفسار بخصوص الطباعة بالكريستال ريبورت (/showthread.php?tid=12842)
استفسار بخصوص الطباعة بالكريستال ريبورت - hatem555 - 28-07-15
استفسار بخصوص الطباعة بالكريستال ريبورت
انا عملت برنامج والحمد لله خلصته
لحد الطباعة
انا عملت الطباعة بالكريستال ريبورت
خليت البرنامج يطبع محتويات الداتا جريد فيو بالكود ده
Dim reportdoc As CrystalDecisions.CrystalReports.Engine.ReportDocument
reportdoc = New CrystalReport12
reportdoc.SetDataSource(dt)
Form3.CrystalReportViewer1.ReportSource = reportdoc
Form3.Show()
Form3.Refresh()
انا محتاج اضيف في صفحة الكريستال ريبورت(الطباعة)
محتويات صندوق نص
اتمني تفيدونا
RE: استفسار بخصوص الطباعة بالكريستال ريبورت - العزابي - 14-08-15
إذا كان قصدك جلب محتويات صندوق النص textbox من الفورم .. وليس من قاعدة البيانات
أولاً ضع قيمة باريميتر في التقرير وليكن بأسم al3zabe ثم أسحببه في التقرير .
بعد ذلك في كود الطباعة
كود :
Dim ParamValue As New CrystalDecisions.Shared.ParameterValues()
Dim ParamName As New CrystalDecisions.Shared.ParameterDiscreteValue()
ParamName.Value = TextBoxX1.Text
ParamValue.Add(ParamName)
rpt.DataDefinition.ParameterFields("al3zabe").ApplyCurrentValues(ParamValue)حيث يقوم بأخذ القيمة المدخلة من قبل المسستخدم في TextBoxX1.Text الموجودة في الفورم