PDA

View Full Version : پارامتر



mshakeri
پنج شنبه 05 اردیبهشت 1387, 19:08 عصر
ا سلام به دوستان
من وقتی پارامتری را با دستور setparamvalue به کریستال ریپورت می فرستم و برنامه را اجرا می کنم یک کادری باز می شود و یک مقدار از من می خواهد و وقتی به آن مقدار می دهم به آنکه مقداری که در کد نوشتم وارد شود مقدار آن کادر وارد می شود مشکل از کجاست؟
با تشکر

Morteza_s
چهارشنبه 11 اردیبهشت 1387, 16:40 عصر
من برای ارسال یک یا چند پارامتر از برنامه به CrystalReport از این روش استفاده می کنم:
مثلآ اگر 3 تا Parameter Field در گزارشتان تعریف کرده باشید:



Dim Report1 As New CrystalReport1

Dim ParamFields As New ParameterFields

Dim Param1 As New ParameterField
Dim Param2 As New ParameterField
Dim Param3 As New ParameterField

Dim ParamValue1 As New ParameterValues
Dim ParamValue2 As New ParameterValues
Dim ParamValue3 As New ParameterValues

CrystalReportViewer1.ReportSource = Report1

Dim ParamDisValue1 As New ParameterDiscreteValue
Dim ParamDisValue2 As New ParameterDiscreteValue
Dim ParamDisValue3 As New ParameterDiscreteValue

ParamFields =CrystalReportViewer1.ParameterFieldInfo

Param1 = ParamFields(0)
Param2 = ParamFields(1)
Param3 = ParamFields(2)

ParamValue1 = Param1.CurrentValues
ParamValue2 = Param2.CurrentValues
ParamValue3 = Param3.CurrentValues

ParamDisValue1 = New ParameterDiscreteValue
ParamDisValue2 = New ParameterDiscreteValue
ParamDisValue3 = New ParameterDiscreteValue

ParamDisValue1.Value = TextBox1.Text
ParamDisValue2.Value = TextBox2.Text
ParamDisValue3.Value = TextBox3.Text

ParamValue1.Add(ParamDisValue1)
ParamValue2.Add(ParamDisValue2)
ParamValue3.Add(ParamDisValue3)

البته ممکن است روش های دیگری هم باشد
اما من در این روش به مشکلی بر نخوردم.

sm
یک شنبه 15 اردیبهشت 1387, 11:18 صبح
روشتون بايد درست باشه اما دقت كنين كه نام پارامتر رو درست رد مي كنين.
كريستال 2 نوع پارامتر داره. يكي پارامترهاي كوئري و يكي هم اونايي كه خودتون دستي اضافه مي كنين.
البته به حروف كوچك و بزرگ نيز حساسه.

موفق باشيد