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@) هم امتحان کردم نشد
میشود راهنمائیم کنید تا مشکل حل شود.
ممنون
گزارشی دارم که دادههای خود را از یک 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@) هم امتحان کردم نشد
میشود راهنمائیم کنید تا مشکل حل شود.
ممنون