الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

طلب مساعدة في التعامل مع Crystalreport9

بدأه النعاس في 10 يناير 2009 · 2 رد · 1,302 مشاهدة · في قسم التقارير
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

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

أخوتي الأعزاء أريد مساعدتكم في أمرين :

الأول :أريد عرض التقرير حسب شرط معين واستخدم الصيغة التالية :

Form3.crv1.SelectionFormula = "{spare_part.week_re}= " & Val(Combo1.Text) & ";"

ولكن يعطيني Run time 424" object required"

الأمر الثاني :

محتاج إلى تمرير قيمة ( رقم الأسبوع مثلاً ) إلى التقرير في وقت التنفيذ وأريد الكود المستخدم لذلك

فياريت ما تبخلوا علي بمساعدتكم ... والله لا يضيع أجر من أحسن عملاً

#2

ارجوا المساعدة ...

#3

تفضل

Dim miReport As CRAXDDRT.Report
	Dim miCRApp As New CRAXDDRT.Application

	Set miReport = miCRApp.OpenReport(App.Path & "\report\sample.rpt")

	With miReport
		.RecordSelectionFormula = "{spare_part.week_re}='" & combo1.Text & "'"
	End With

	With CRViewer91
		.ReportSource = miReport
		.ViewReport

	End With
	Set miCRApp = Nothing
	Set miReport = Nothing

sample هو إسم التقرير

مواضيع مشابهة