چجوری از یک فایل ساخته شده در کریستال ریپورت در بیسیک استفاده کنیم

[majj]

حرفه ای ها بیان

با سلام من یک فایل گزارش در کرستال ریپورت 9دارم چجوری اونو در بیسیک 6 مورد استفاده قرار دهم

[kbdfa]

سلام
با اين كد ميتوني گزارشت رو تو وي بي نمايش بدي

Private Sub Command1_Click()
Dim crapp As New craxdrt.application
Dim crRept As New craxdrt.report
Set crRept = crapp.openReport(App.Path & "\report.rpt")
CrystalActivexReportViewer1.ReportSource = crRept
CrystalActivexReportViewer1.ViewReport
Set crapp = Nothing
Set crRept = Nothing
End Sub

اگه مشكلي بود بفرما دوستان كمك ميكنن
موفق باشي

[majj]

سلام
با اين كد ميتوني گزارشت رو تو وي بي نمايش بدي

Private Sub Command1_Click()
Dim crapp As New craxdrt.application
Dim crRept As New craxdrt.report
Set crRept = crapp.openReport(App.Path & "\report.rpt")
CrystalActivexReportViewer1.ReportSource = crRept
CrystalActivexReportViewer1.ViewReport
Set crapp = Nothing
Set crRept = Nothing
End Sub

اگه مشكلي بود بفرما دوستان كمك ميكنن
موفق باشي

حتما تست میکنم و متشکرم از راهنمایی خوب شما

[majj]

حتما تست میکنم و متشکرم از راهنمایی خوب شما

ببخشید اما این در خط دوم ERROR میگیره و میگه که یک متغییر تعریف نشده

[shamsoft]

قبلا تو سايت خودم يه سورس گذاشته بودم:
[ برای مشاهده لینک ، با نام کاربری خود وارد شوید یا ثبت نام کنید ]
البته در اين سورس گزارشش توسط كريستال ريپورت 10 درست شده كه فكر نكنم واسه ورژن 9 هم مشكلي پيش بياره

[majj]

با سلام مجدد
ببخشید که مرتب سوال میپرسم
من در سایت شما هم عضو بود ه ام پروژه شما را هم دانلود کردم اما موقع اجرا یک فایل dll رو پیدا نمیکنه
crviewer.dll رو پیدا نمیکنه و اجرا هم نشد
باز هم متشکرم اگه میشه دوباره راهنمایی کنید و در مورد کد خود نیز مقداری توضیح بنویسید
منتظر جواب شما هستم

[majj]

این که جواب نمیده