PDA

View Full Version : اجرای گزارش مبتنی بر Store Procedure



A.Farzin
شنبه 16 تیر 1386, 20:32 عصر
با سلام
گزارشی دارم که داده‌های خود را از یک Store Procedure پارامتریک می‌گیرد. در موقع طراحی گزارش، به ازای پارامترهایی که نیاز است به SP پاس شوند یک Parameter Fields درست شد.
برای اجرای گزارش در یک برنامه VB6 به شکل زیر، پارامترهای مورد نیاز SP را به گزارش پاس میکنم ولی به محض رسیدن به خط تعیین پارامترها، خطای Object Requred ظاهر می‌شود.

Set crReprt = crApp.OpenReport(App.Path & "\Report1.rpt")
crReprt.Database.LogOnServer "p2ssql.dll", Server1, DatabaseName1, "sa", ""
For Each crDBTab In crReprt.Database.Tables
crDBTab.SetLogOnInfo Server1, DatabaseName1, "sa", ""
Next
crReprt.ParameterFields.GetItemByName("AC1").Value = 20
crReprt.ParameterFields.GetItemByName("Ac2").Value = 14
crReprt.ParameterFields.GetItemByName("Year").Value = 1385
crReprt.DiscardSavedData
CRViewer91.Refresh
crReprt.ReadRecords
حتی اسم این پارامترها را با @ قبل از آن (مثل AC1@) هم امتحان کردم نشد
میشود راهنمائیم کنید تا مشکل حل شود.

ممنون

sm
پنج شنبه 21 تیر 1386, 09:46 صبح
بجای استفاده از این کد crReprt.ParameterFields.GetItemByName از این استفاده کنین:
crReprt.SetParameter

موفق باشید

tdodangeh
یک شنبه 23 تیر 1387, 14:53 عصر
من هم همین مشکل را دارم، اما بعد از SetParameter،crreprt وجود ندارد