riazi_ali
شنبه 25 اسفند 1386, 10:39 صبح
برای ارتقاء یک سیستم از 2003 به 2008 با مشکل برخورد کردم. و در هنگام گزارش کیری کلیه پارامترهای که از برنامه با کد نویسی ارسال می کردم در محیط 2008 یک فرم وارد کردن پارامتر ظاهر می گردد در صورتی که نیازی به آن ندارم نمونه کد نوشته شده به شکل زیر است
Dim Param As New CrystalDecisions.Shared.ParameterValues
Dim pDate As New ParameterDiscreteValue
Param.Add(pDate)
report.DataDefinition.ParameterFields("@CurDate").ApplyCurrentValues(Param)
pDate.Value = cmbReportType.SelectedItem
report.DataDefinition.ParameterFields("@Title").ApplyCurrentValues(Param)
report.SetDataSource(ds.Tables(0))
z.CRViewer.ReportSource = report
z.ShowDialog()
Dim Param As New CrystalDecisions.Shared.ParameterValues
Dim pDate As New ParameterDiscreteValue
Param.Add(pDate)
report.DataDefinition.ParameterFields("@CurDate").ApplyCurrentValues(Param)
pDate.Value = cmbReportType.SelectedItem
report.DataDefinition.ParameterFields("@Title").ApplyCurrentValues(Param)
report.SetDataSource(ds.Tables(0))
z.CRViewer.ReportSource = report
z.ShowDialog()