19-12-18, 11:27 PM
السلام عليكم عندى مشكله صغيره عند عمل تقرير للريبورت فيور كيف لى ان اختار اسم واحد وليس كامل القاعده اريد اسم واحد يظهر فى الريبوت فيور
نسخه فيجول 2010
الاسم يحدد من الفورم والقاعدة اكسس
والاتصال عبر البرنامج ليس كود
'هنا نقوم بتعبئة الداتاسيت بسجل واحد محدد
dim dp as new oleDbDataAdapter("Select * From tpl1 where ID=1",conn)
'هنا نقوم بتعبئة الداتاسيت بجميع السجلات
dim dp as new oleDbDataAdapter("Select * From tpl1",conn)
Dim ds as new dataset
dp.Fill(ds)'TODO: This line of code loads data into the 'datanDataSet.data' table. You can move, or remove it, as needed.
Me.dataTableAdapter.Fill(Me.datanDataSet.data)
Me.ReportViewer1.RefreshReport()SELECT name, [Date], madical1, madical2, medicine1, medicine2, medicine3, medicine4, medicine5, Notes
' FROM(Data)(20-12-18, 07:22 AM)issamsaidd كتب : [ -> ]شكرا لكم كثيرا فتحت لقيت الكوده ده حاولت اعدل ما زبط ممكن تعديل من عندكم ولكم جزيل الشكر
كود :
'TODO: This line of code loads data into the 'datanDataSet.data' table. You can move, or remove it, as needed.
Me.dataTableAdapter.Fill(Me.datanDataSet.data)
Me.ReportViewer1.RefreshReport()
كود الجدول الى عندى ملاحظه الربط ليس عن طريق كود با ربط با استخدام الفيجول
كود :
SELECT name, [Date], madical1, madical2, medicine1, medicine2, medicine3, medicine4, medicine5, Notes
' FROM(Data)
Me.dataTableAdapter.FillByItem(Me.datanDataSet.name, TextBox1.Text)
Me.ReportViewer1.RefreshReport