منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب
[VB.NET] مساعدة بخصوص الريبورت - نسخة قابلة للطباعة

+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم قواعد البيانات (http://vb4arb.com/vb/forumdisplay.php?fid=40)
+--- قسم : قسم اسئلة التقارير والطباعة تحت بيئة الـ.NET (http://vb4arb.com/vb/forumdisplay.php?fid=71)
+--- الموضوع : [VB.NET] مساعدة بخصوص الريبورت (/showthread.php?tid=13034)

الصفحات: 1 2


مساعدة بخصوص الريبورت - theghost - 24-08-15

السلام عليكم

رأيت موضوع الاخ الفاضل مبرمج بلا حدود وطبقت مثل ماهو موجود في موضوعه ولكن الصفحه تبقى بيضاء رغم اني طبقته تدريجيا فهل من الممكن ان تأتوني بالشرح الفصل لهذة العملية ؟

اريد ان يتم قراءة مايكتب في :
1- TextBox
2-ListVeiw
3-BomboBox
4-DateTimePicker


RE: مساعدة بخصوص الريبورت - theghost - 26-08-15

وين الخبراء بغيت شرح مصور


RE: مساعدة بخصوص الريبورت - أبو عمر - 26-08-15

ارفع مثالك


RE: مساعدة بخصوص الريبورت - theghost - 26-08-15

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

http://adf.ly/1NKX85 هذا رابط التحميل


RE: مساعدة بخصوص الريبورت - أبو عمر - 26-08-15

الله يحفظك طلبتك مثال للمشكلة
وليس ملف مشروع بأكمله
على العموم مشكلتك في التقرير
اخبرني بأسماء الجداول اللي تبغاها تظهر في التقرير
اما بالنسبة لتمرير قيمة Textbox
فتحتاج لبارومتر
بانتظارك


RE: مساعدة بخصوص الريبورت - theghost - 27-08-15

اخي الفاضل كل الى اريده شيء بسيط اني اعبئ
TxtBox
DateandTimePicker
ComboBox
ListView
الطريقة كالاتي :
ComboBox = [Ren_NO]
TextBox1= [Ren_NO]
Dateand TimePicker = [Ren_Date]
TxtBox = [Cus_Private_Number]
TxtBox2,3,4 = يملئ يدويا من الفورمة نفسها

ListView
[Cus_Private_Number]
[Equ_Quantity]
[Equ_Quantity]
[Ren_Date]
Finsh = يدويا
H / D = يدويا
Unite = يدويا
Rate = يدويا

وشكرا كلش بسيط لكن انا ماعرفت


RE: مساعدة بخصوص الريبورت - أبو عمر - 27-08-15

سأعلمك الاصطياد بدل من أطعمك السمك
فمشروعك بالنسبة لي متاهة لم افهمها 
فهمت منك انك تريد تمرير اشياء تكتبها على الفورم
وتجدها على التقرير
اما عن الداتا التي تريدها على التقرير فهي مسؤليتك
مثال تمرير من الفورم الى الريبورت مرفق وبالتوفيق


[attachment=7725]


RE: مساعدة بخصوص الريبورت - theghost - 27-08-15

مشكور اخوي لكن اعذرني لدي بعض الاسئلة
انت الحين عطيتني طريقة باراميتر
Dim myP As New Microsoft.Reporting.WinForms.ReportParameter("P1", TextBox1.Text)
ReportViewer1.LocalReport.SetParameters(myP)
Me.CustomerTableAdapter.Fill(Me.Database1DataSet.Customer)
Me.ReportViewer1.RefreshReport()
-------------------------------------------------------------------------------------------------
وانا وجدت مثل الطريقة ولكن بكود اصغر
---------------------------------
Imports Microsoft.Reporting.WinForms
Public Class Form11
Private Sub Form11_Load(sender As Object, e As EventArgs) Handles MyBase.Load
Dim testparam As New ReportParameter("Rent", Form10.ComboBox1.Text)

ReportViewer1.LocalReport.SetParameters(testparam)

Me.ReportViewer1.RefreshReport()
End Sub
End Class

فسؤالي يطؤح نفسه :
اذا كنت اريد ان اضع اكثر من تكس بوكس او اي شيء يتعلق بالريبورت فماذا افعل ؟
يعمي الحين :
Dim myP As New Microsoft.Reporting.WinForms.ReportParameter("P1", TextBox1.Text)
يقول ان الخانه p1 تقرأ من textbox1
اذا بغيت اضع اكثر من تكس بوكس ما الكود الاضافي لهذة العملية بحث عنها ولم اجد سوى هذا المثال من غير اكثر من تكس بوكس


RE: مساعدة بخصوص الريبورت - أبو عمر - 27-08-15

(27-08-15, 11:25 PM)theghost كتب : مشكور اخوي لكن اعذرني لدي بعض الاسئلة
انت الحين عطيتني طريقة باراميتر
Dim myP As New Microsoft.Reporting.WinForms.ReportParameter("P1", TextBox1.Text)
       ReportViewer1.LocalReport.SetParameters(myP)
       Me.CustomerTableAdapter.Fill(Me.Database1DataSet.Customer)
       Me.ReportViewer1.RefreshReport()
-------------------------------------------------------------------------------------------------
وانا وجدت مثل الطريقة ولكن بكود اصغر
---------------------------------
Imports Microsoft.Reporting.WinForms
Public Class Form11
   Private Sub Form11_Load(sender As Object, e As EventArgs) Handles MyBase.Load
       Dim testparam As New ReportParameter("Rent", Form10.ComboBox1.Text)

       ReportViewer1.LocalReport.SetParameters(testparam)

       Me.ReportViewer1.RefreshReport()
   End Sub
End Class

فسؤالي يطؤح نفسه :
اذا كنت اريد ان اضع اكثر من تكس بوكس او اي شيء يتعلق بالريبورت فماذا افعل ؟
يعمي الحين :
Dim myP As New Microsoft.Reporting.WinForms.ReportParameter("P1", TextBox1.Text)
يقول ان الخانه p1 تقرأ من textbox1
اذا بغيت اضع اكثر من تكس بوكس ما الكود الاضافي لهذة العملية بحث عنها ولم اجد سوى هذا المثال من غير اكثر من تكس بوكس

الكودين نفس الطول انما اللي انت وجدته استدعى الريفرنس في التصاريح وانا حبيت اكنتبها على سطر واحد
يعني كل الرطق تودي للروما
بالنسبة P1
هذا اسم بارومتر متر تسويه في تصميم التقرير طبعا تقدر تضيف اكثر واكثر 
مثلا
p2 p3 etc.....


RE: مساعدة بخصوص الريبورت - مبرمج بلا حدود - 28-08-15

السلام عليكم ورحمة الله وبركاته
هل تريد طباعة بيانات موجودة داخل قاعدة بيانات وتعرض على الفورم.
ام بيانات انت تكتبها داخل تيكست او ادوات اخرى وتريد تمريرها الى الريبورت فيور
حفظكـ الله