كيف أمرر قيمة من الفيجوال إلى الكريستال ريبورت 10

مغلق

بدأه فيجولي في 7 يوليو 2007 · 4 رد · 1,334 مشاهدة · في قسم التقارير

مشاركة: واتساب X فيسبوك تيليجرام

#17 يوليو 2007 في 09:10 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

أرجو منكم تزويدي بطريقة إرسال قيمة من الفيجوال إلى الكريستال ريبورت

فمثلا لو كان لدي تكست بوكس في الفورم وأريد أن أرسل محتواه إلى تكتس بوكس في الكريستال

كيف يكون ذلك ؟؟؟؟

جميع الأجوبة التي وجدتها كانت بالطريقة التالية :

Dim rpt As New CrystalReport1
rpt.SetParameterValue("title", Me.TextBox1.Text)

ولكن على ما يبدو أن هذه الطريقة في إصدارات الكريستال قبل 10

لأن الخاصية SetParameterValue ليست موجودة في الكريستال 10

أرجو منكم إفادتي حيث أني سئمت من البحث سواءا في المواقع العربية أو الأجنبية

وشكرا لكم

#27 يوليو 2007 في 10:44

وجدتها وجدتها :lol:

شكرا لكم

وجدتها بعد جهد جهيد

وإليكم الطريقة للفائدة :

نقوم بإنشاء Parameter Fields في الكريستال ريبورت وليكن اسمه Test1

ثم نقوم بكتابة الكود التالي في حدث التحميل لللفورم

Report.ParameterFields.GetItemByName("Test1").AddCurrentValue (module1.ID)

حيث Report هو كائن التقرير الذي قمنا بتعريفه في الجنرال

Dim Report as new CrystalReport1

و module1.ID عبارة عن متغير في موديول

أتمنى لكم الفائدة

-waf

#320 يوليو 2007 في 20:55

اخي الكريم .

لا داعي لكل ذلك فبإمكانك مناداة الفيلد مباشرة . مثال

لو لدينا في التقرير مربع نص اسمه Text1 نرغب بتعبئته من التكست الموجودة في الفورم فقط نكتب الكود التالي :

Crystalreport.text1.setText Text1.text

حيث ان Text1.text هو محتوى التكست الموجودة في الفورم

تحياتي

OMANI FOR EVER

-------------------------------------------------

#41 سبتمبر 2007 في 04:38

يا إخوة أنا أحتاج لتوضيح أكثر مع العلم أننى أعمل على بيئة IDE بالكريستال 10

أنا أريد عندما أدخل البيانات للجدول أن ترحل على التقرير مباشرة هل هذا ممكن وكيف

أرجو من لديه الإجابة أن لا يبخل بها على

تم تعديل هذه المشاركة بواسطة math_3 في 1 سبتمبر 2007 في 04:56

#51 سبتمبر 2007 في 21:46

هذا الموضوع مغلق.

عدد الزوار حالياً