أخواني الاجلاء
السلام عليكم ورحمة الله وبركاتة
كيف يتم عرض نتائج البحث في Datagrid داخل تقرير ؟ بحيث البيانات التي سوف ستظهر في Datagrid عند الضغط علي الزر
يتم فتح التقرير وبداخله النتائج المعروضة داخل داتا جريد
مرفق مثال للتعديل عليه
شكرا لكم
أخواني الاجلاء
السلام عليكم ورحمة الله وبركاتة
كيف يتم عرض نتائج البحث في Datagrid داخل تقرير ؟ بحيث البيانات التي سوف ستظهر في Datagrid عند الضغط علي الزر
يتم فتح التقرير وبداخله النتائج المعروضة داخل داتا جريد
مرفق مثال للتعديل عليه
شكرا لكم


السلام عليكم أخي الكريم :
أنا لم أر المثال المرفق ( سامحني ) و لكن :
تقرير الـ Crystal سيظهر بيانات موجودة في كائن DataTable ....
لذلك ممكن أن تجعل هذه الـ DataTable التي يقرأ منها التقرير هي نفسها الـ DataTable
التي ترتبط بها أداة الـ DataGrid أو DataGridView.
بمعنى آخر : التقرير و أداة DataGrid كلاهما يقرأ أو يعرض من نفس المصدر.
والله أعلم ... أرجو أن تفيدك هذه الطريقة , أخبرنا بالنتائج , وفقك الله ...
اخي الكريم
انا ايضا لم ار المثال المرفق (سامحني) ولكن :
لعرض البيانات في تقرير تحتاج للاتصال بالداتا بيس مباشرتا او استخدام الداتا سيت
انا وجهتني نفس المشكله من قبل وكنت اريد ان اجهل البيانات التى بالداتا غريد فيو في تقرير
لذلك قمت اولا بحفظ البيانات التى بالدتاغريد الى داتا تيبل
وبعد ذلك قمت باستدعاء الداتا تيبل من التقرير
الى الخطوات التى استخدمتها اتمنى ان تستفيد منها
في البداية انا كان عندي فريم يحتوي على داتا غريد فيو بها معلومات
وكنت اريد ان اطبعها على شكل جدول في تقرير منفصل
اول شي عملته بعد ذلك هو انني اضف داتا سيت بشكل يدوي (ليس عن طريق الكود يعني)
وجعلت اسمها rptdataset
بعد ذلك اضفت datatable من صندوق الادوات وجعلت اسمها rptdt
ثم اضفت ست اعمده لها ( على حسب الاعمده التى بالدتا غريد فيو)
بالطبع هيدي الخطوات كلها قبل ما تضيف التقرير نفسه
الان اصبحت الداتا سيت جاهزه باقي بس اضيف البيانات الموجوده في الداتا غريد فيو اليها
فقمت بكتابة الكود التالى :
Dim rptDS As New rptDataSet Dim NewDR As DataRow For intLoop As Integer = 0 To Me.DataGridView1.RowCount - 2 NewDR = rptDS.rptDT.NewRow NewDR(0) = Me.DataGridView1.Item(0, intLoop).Value NewDR(1) = Me.DataGridView1.Item(1, intLoop).Value NewDR(2) = Me.DataGridView1.Item(2, intLoop).Value NewDR(3) = Me.DataGridView1.Item(3, intLoop).Value NewDR(4) = Me.DataGridView1.Item(4, intLoop).Value NewDR(5) = Me.DataGridView1.Item(5, intLoop).Value rptDS.rptDT.Rows.Add(NewDR) Next
الان اصبحت الداتا سيت التى لدي فيها معلومات
وقد اتيت بالمعلومات من الداتا قريدفيو التى لدي
الان تضيف تقرير بشكل عادي وعندما تاتي لك صفحه مصدر البيانات اختر الدتا سيت الت عبئتها الان واكمل عادي
اتمنى ان تكون الفكره قد وضحت لديك
واسفه ادا طولت عليك بالشرح
تم تعديل هذه المشاركة بواسطة صاحبة السمو في 19 أبريل 2007 في 11:31

أبو همام كتب:السلام عليكم أخي الكريم :أنا لم أر المثال المرفق ( سامحني ) و لكن :
:lol: :lol:
صاحبة السمو كتب:اخي الكريمانا ايضا لم ار المثال المرفق (سامحني) ولكن :
:lol: :lol:
يظهر ان الملف المرفق كان لابس طاقية اخفا
علي العموم يا أستاذ أبو همام شكراً لك
أختي الغاليه صاحبة السمو
شكراً لك علي مجهودك الرائع
لكن اذا سمحتي تعدلي علي المثال لان الموضوع ما ظبط معايا
شكراً لك جزيلاً وعلي العموم انا ما زلت بحاول أظبط الموضوع


اسفه اخي الكريم
بس انا كان قصدي انو تجرب الخطوات بنفسك
لاني انا جلست شهر احاول واجرب وكان هناك احد يعطيني المعلومه على الجاهز وبصراحه ما تعلمت الا لما جربت بنفسي
على العموم انا كان قصدي انو تعم الفائده لك بشكل اكبر حتى لو احتجتها تناني مره تعملها بنفسك
هدا هو الحل اخي الكريم واي سوال انا بالخدمة
تحياتي لك

مجهود رائع ، وأحب أن أضيف مشرع يتعلق بطباعة محتوايات الداتاقريد في تقرير ، ولقد حصلت عليه من ( Planet-Source-Code.com ) والله الموفق ..
1 - سقوط الإنسان ليس فشلاً ، ولكن الفشل أن يبقى حيث سقط .
2 - الفاشلون قسمان : قسم فكر ولم يفعل ، وقسم فعل ولم يفكر .
-------------------------------------------------------
درس في ADO.NET 2005, التعامل مع الجداول المترابطة في ado.net 2005
إذا ممكن يا أخ محمد تحويل المثال إلى إصدار 2003 وتكون خدمتني خدمة كبيرة جداً
سبحان الذي يغير ولا يتغير
oscar_3033 كتب:إذا ممكن يا أخ محمد تحويل المثال إلى إصدار 2003 وتكون خدمتني خدمة كبيرة جداً
أعتقد أختي بأن البرنامج أصلاً كان مصمم بالدوت نت 2003 وقد تم تحويلة إلى 2005 لذا فهو يعمل على النسخة 2003 , وإن شاء الله إن وجدت فروق فالفروق بالتأكيد ستكون طفيفة ..
بالتوفيق للجميع ..
هذا الموضوع مغلق.
المتواجدون خلال آخر دقيقتين · يتحدّث كل ٣٠ ثانية
جارٍ التحقق من المتواجدين…