مشکل کار با فانکشن در کریستال ریپورت

[moh1384]

با سلام
از دوسانی که با کریستال ریپورت 9 کار کردن خواهشی داشتم
معادل دستور ذیل که در کریستال ریپورت 4 هست در ورژن 9 به چه صورت است

frm1.CrystalReport1.Formulas(1) = "DatEn= '" & Me.MaskEdBox1(1).Text & "'"

DatEn نام فانکشن در ریپورت است که از طریق برنامه میخواهم مقدار دهی کنم

ممنون میشم کمکم کنید
با تشکر

[Sal2010]

سلام

For X = 1 To Report.FormulaFields.Count
If Report.FormulaFields.Item(X).Name = "{@CompanyName}" Then Report.FormulaFields.Item(X).Text = "'" + strCompanyName + "'"
If Report.FormulaFields.Item(X).Name = "{@Date}" Then Report.FormulaFields.Item(X).Text = "'" + GJDate(Date) + "'"
Next

[kiss_my_l0ve]

کسی سریال کریستال ریپورت 2008 رو داره
kiss_my_l0ve@yahoo.com

[moh1384]

سلام
دوست عزیز ممنون که جواب دادی
فکر کنم سوال رو خوب طرح نکردم منظورم ارسال مقدار از طریق vb به گزارش است
مثلا تاریخ روز رو بفرستم برای گزارش و چاپ کردن
بازهم ممنون که جواب دادید
:لبخندساده:

[Sal2010]

سلام
نمونه كدي كه برايتان گذاشتم دقيقا همان چيزي است كه ميخواهيد يعني تاريخ از طريق وي بي براي ريپورت ارسال ميشود تعجب ميكنم كه كجاي قضيه نامفهوم هست ؟
gjdate(date)þ كه gjdate تابعي است كه خودم نوشتم و اين موضوع ربطي به ارسال به كريستال نداره شما همون date خالي را بگذاريد و كاملا درست كار ميكنه اگر سوالي بود در خدمتم .