点击此处--->   群内免费提供SAP练习系统（在群公告中）

加入QQ群：457200227（SAP S4 HANA技术交流） 群内免费提供SAP练习系统（在群公告中）

我有点机智。 我有一个 asp.net 应用程序，并且我正在尝试查看Crystal报表。 我已经用另一个应用程序完成了。 与当前应用程序的唯一区别是，我传递了开始日期和结束日期参数。 我可以打电话报告。 但是，一旦我按下了下一页按钮，就会遇到问题。 我找到了有关使用会话的知识库示例1985571。 除了me.init子程序外，我几乎能够将其转换为 vb.net 。 也更新到最后一个Service Pack。 在报告查看器中单击"下一页"时，我得到的是以下消息：

错误参数字段和参数字段当前值的类型不兼容。

我在弹出窗口中输入开始日期和结束日期参数并登录，但是现在有了会话，这些弹出窗口就消失了。 在.aspx中呢？ 这些设置？ 我尝试了两种方法都无济于事。 ReuseParameterValuesOnRefresh =" True" EnableParameterPrompt =" False"

这是我的代码-有什么想法吗？

公开课测试
     继承System.Web.UI.Page
     私有designerPlaceholderDeclaration为System.Object
     将myReport调为新的ReportDocument（）


     私有Sub cmdVi​​ew_Click（作为对象发送，作为EventArgs发送）处理cmdVi​​ew.Click
         如果（（Session（" Report"）'Nothing））然后
             将myConnectionInfo昏暗为ConnectionInfo =新的ConnectionInfo（）

                 myReport.Load（Server.MapPath（" Reports/CTEmpAttendance.rpt"））

             '将参数传递给报告
                 昏暗的开始日期，结束日期作为日期

                 startdate = FormatDateTime（txtStartDate.Text，DateFormat.ShortDate）
                 enddate = FormatDateTime（txtEndDate.Text，DateFormat.ShortDate）

                 txtStartDate.Text = startdate.ToString（" yyyy-MM-dd"）
                 txtEndDate.Text = enddate.ToString（" yyyy-MM-dd"）
                 myReport.SetParameterValue（0，txtStartDate.Text）
                 myReport.SetParameterValue（1，txtEndDate.Text）

             将myTables设为表= myReport.Database.Tables

             对于每个myTable，作为myTables中的CrystalDecisions.CrystalReports.Engine.Table
                 将myTableLogonInfo设置为TableLogOnInfo = myTable.LogOnInfo
 '在这里登录。。。没有代码进行演示
                 myTableLogonInfo.ConnectionInfo = myConnectionInfo
                 myTable.ApplyLogOnInfo（myTableLogonInfo）
             下一个

             CrystalReportViewer1.ReportSource = myReport
             CrystalReportViewer1.DataBind（）
         其他
             myReport = CType（Session（" Report"），ReportDocument）
             '现在将报告发送给查看者
             CrystalReportViewer1.ReportSource = myReport
         万一
     结束子

  私有子Test_Init（作为对象发送者，作为EventArgs发送者）处理Me.Init
         如果不是IsPostBack然后
             昏暗开始为整数
             结束日期为Intger
             Dim dt As DateTime = DateTime.Now
             昏暗的开始日期，结束日期作为日期

             开始= -7
             结束日= -1

             startdate = FormatDateTime（Date.Now（）。AddDays（start），DateFormat.ShortDate）
             enddate = FormatDateTime（Date.Now（）。AddDays（endday），DateFormat.ShortDate）

             txtStartDate.Text = startdate.ToString（" yyyy-MM-dd"）
             txtEndDate.Text = enddate.ToString（" yyyy-MM-dd"）
         其他
             如果不是IsNothing（CType（Session（" Report"），ReportDocument））然后
                 myReport = CType（Session（" Report"），ReportDocument）
 '以正确的格式对日期进行硬编码以确保
                 myReport.SetParameterValue（0，" 2020-05-20"）
                 myReport.SetParameterValue（1，" 2020-05-20"）
                 CrystalReportViewer1.ReportSource = myReport
             万一
         万一
     结束子