PDA

View Full Version : سوال: Crystal



unassigned_identifier
دوشنبه 06 خرداد 1387, 09:25 صبح
میخوام به پارامتر های کریستال از داخل C# مقدار بدم.
از کد زیر استفاده می کنم اما خطای invalid index میده.
تویه تالار C# پرسیدم کسی جواب نداد.
اگه مشکلم رو حل کنید ممنون میشم.

ReportDocument RepDoc = new ReportDocument()
;
string RepPath = Application.StartupPath + "\\CrystalReport1.rpt (file://\\CrystalReport1.rpt)"
;
RepDoc.Load(RepPath)
;
crystalReportViewer1.ReportSource = RepDoc;

//------------------------------------------
-

ParameterValues parameterValues = new ParameterValues()
;
ParameterDiscreteValue parameterDiscreteValue = new
ParameterDiscreteValue()
;
parameterDiscreteValue.Value = "ParameterValue"
;
parameterValues.Add(parameterDiscreteValue)
;
ParameterFieldDefinitions parameterFieldDefinitions
=
RepDoc.DataDefinition.ParameterFields;
ParameterFieldDefinition parameterFieldDefinition
=
parameterFieldDefinitions["Text1"]
;
parameterFieldDefinition.ApplyCurrentValues(parame terValues)
;
م
پارامتر هایی رو که از تویه کریستال خودم مقدار میدم رو نمایش میده اما از تویه c# نمیشه.:گریه::گریه::گریه::گریه ::گریه::گریه::گریه::گریه::گریه ::گریه::گریه::گریه::گریه::گریه ::گریه::گریه::گریه::گریه::گریه ::گریه::گریه::گریه:

amirzazadeh
پنج شنبه 16 خرداد 1387, 08:55 صبح
[quote=unassigned_identifier;524383]میخوام به پارامتر های کریستال از داخل C# مقدار بدم.
از کد زیر استفاده می کنم اما خطای invalid index میده.
تویه تالار C# پرسیدم کسی جواب نداد.
اگه مشکلم رو حل کنید ممنون میشم.
quote]
اين متد رو هم امتحان كن.


Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim con As New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Documents and Settings\am\Desktop\db11.mdb")
Dim dap As New OleDbDataAdapter("SELECT * FROM Table1 ", con)
Dim dst As New DataSet
Dim opr As New CrystalReport1
con.Open()
dap.Fill(dst, "table1")
con.Close()
opr.SetDataSource(dst)
opr.SetParameterValue("shomare-faktor", Shomare_faktorTextBox.Text)
Form2.CrystalReportViewer1.ReportSource = opr
Form2.Show()
End Sub
البته شماكانكشن خودت را بايد بهش اضافه كني.
..........................
موفق باشيد