水晶报表错误? [英] crystal report error ?

问题描述

此代码使我出错，参数不正确，但是正确吗?！

this code get me error the paraeter is not correct but it is correct?!

    Private Sub TabPage12_Enter(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TabPage12.Enter

Dim path As String = Application.StartupPath.Remove(Application.StartupPath.Length - 10)
      path += "\HairRpt.rpt"
      'HairRpt1.Load("HairRpt.rpt")
      'HairRpt1.FileName = "HairRpt.rpt"
      Dim Report As ReportDocument = New ReportDocument()
      Dim coninfo As ConnectionInfo = New ConnectionInfo()
      coninfo.ServerName = "."
      coninfo.DatabaseName = "Matab"
      Report.Load(path)
      Report.FileName = path
      CrystalReportViewer1.ReportSource = path

      Dim parameter As ParameterFields = CrystalReportViewer1.ParameterFieldInfo
      Dim ID As ParameterField = New ParameterField()
      ID.Name = "ID"
      Dim ID_value As ParameterDiscreteValue = New ParameterDiscreteValue()
      ID_value.Value = CLng(lblId.Text)
      ID.CurrentValues.Add(ID_value)
      parameter.Add(ID)
      Dim idForm As ParameterField = New ParameterField()

      idForm.Name = "idForm"
      Dim idForm_value As ParameterDiscreteValue = New ParameterDiscreteValue()
      idForm_value.Value = CLng(lblId.Text)
      idForm.CurrentValues.Add(idForm_value)
      parameter.Add(idForm)
      Dim IDForm1 As ParameterField = New ParameterField()

      IDForm1.Name = "IDForm"
      Dim IDForm1_value As ParameterDiscreteValue = New ParameterDiscreteValue()
      IDForm1_value.Value = CLng(lblId.Text)
      IDForm1.CurrentValues.Add(IDForm1_value)
      parameter.Add(IDForm1)
      Dim type As ParameterField = New ParameterField()

      type.Name = "type"
      Dim type_value As ParameterDiscreteValue = New ParameterDiscreteValue()
      type_value.Value = 1
      type.CurrentValues.Add(type_value)
      parameter.Add(type)
      Dim logonInfo As TableLogOnInfo = CrystalReportViewer1.LogOnInfo(0)
      logonInfo.ConnectionInfo = coninfo
      'Report.ParameterFields("ID").CurrentValues.Add(CLng(lblId.Text))
      'Report.ParameterFields("idForm").CurrentValues.Add(CLng(lblId.Text))
      'Report.ParameterFields("type").CurrentValues.Add(1)
      'Report.ParameterFields("IDForm").CurrentValues.Add(CLng(lblId.Text))

      'Report.SetParameterValue("ID", CLng(lblId.Text))
      'Report.SetParameterValue("idForm", CLng(lblId.Text))
      'Report.SetParameterValue("type", 1)
      'Report.SetParameterValue("IDForm", CLng(lblId.Text))
      'CrystalReportViewer1.ParameterFieldInfo = parameter
      'CrystalReportViewer1.ReportSource = Report
  End Sub

  Private Sub CrystalReportViewer1_ReportRefresh(ByVal source As System.Object, ByVal e As CrystalDecisions.Windows.Forms.ViewerEventArgs) Handles CrystalReportViewer1.ReportRefresh
      e.Handled = True
  End Sub

推荐答案

查看此

摘自文章 [ ^ ]:

#错误- 参数不正确 :

当我使用paramField.Name ="vDepartment"时出现此错误；而不是paramField.Name ="@vDepartment";.这是因为在报告中，字段资源管理器中的参数字段名称为@vDepartment.因此，请记住在报告中使用的C#代码中的确切名称(用于参数/输入字段).

# Error - The parameter is incorrect:

I got this error when I used paramField.Name = "vDepartment"; instead of paramField.Name = "@vDepartment";. This is because in the report, the parameter field name in the Field Explorer is @vDepartment. So remember to use the exact name in the C# code as that is used in the report (for parameter/input fields).

这篇关于水晶报表错误?的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！