مشكل در گروه بندي گزارش در استيمول با كد نويسي

[aslan]

سلام
دوستان من ميخواهم فيلد گروهبندي گزارشمو از طريق برنامه ( در اينجا مثلا از طريق يك تكست باكس ) انتخاب و به فايل گزارش ارسال كنم تا گزارشم بر اساس فيلد انتخابي گروهبندي شود . كدهاي مربوط به اين بخش از برنامه ام بشرح زير ميباشد.
گزارش مورد نظرم بعلت وجود اشتباه در كد نويسي ( و يا هر علت ديگري ) بصورت گروهبندي شده نميباشد و گروهبندي مورد نظرم اعمال نميشود ...... خواهشمند است راهنمايي فرماييد


stiReport1.Load(System.Windows.Forms.Application.S tartupPath + "\\Report\\RepGrt2.mrt");
stiReport1.RegData("view", objviewGrt);
stiReport1.Compile();
stiReport1["Var1"] = TextBox1.Text.Trim();
stiReport1.Render();
stiReport1.Show();

Var 1 يك Variable در استيمول است

كدهاي فايل گزارش نيز بشرح زير ميباشد :



public void GroupHeaderBand1__GetValue(object sender, Stimulsoft.Report.Events.StiValueEventArgs e)
{
e.Value = Var1;
}

[iman_22a]

StiReport1.Load("mrt/frmOReport.mrt")

Dim checked_rb As String = ""
If rbCargo.Checked = True Then
checked_rb = "Cargo"
ElseIf rbCompany.Checked = True Then
checked_rb = "Company"
ElseIf rbMojavez_Date.Checked = True Then
checked_rb = "Mojavez_Date"
ElseIf rbDriverName.Checked = True Then
checked_rb = "DriverName"
End If

Dim ghb1 As StiGroupHeaderBand = CType(StiReport1.Pages(0).Components.Item("GroupHeaderBand1"), StiGroupHeaderBand)
Dim cond As New StiCondition
Dim expr As New StiExpression
expr.Value = "{OxinReport." & checked_rb & "}"
cond.Expression = expr
ghb1.Condition.Value = expr.Value

Dim txt_Group As StiText = CType(ghb1.Components.Item("txt_Group"), StiText)
txt_Group.Text = expr.Value

Dim lbl_Group As StiText = CType(ghb1.Components.Item("lbl_Group"), StiText)
lbl_Group.Text = DirectCast(FindControl("rb" + checked_rb, Me), RadioButton).Text

StiReport1.RegData("OxinReport", tbl)
StiReport1.ScriptUpdate()
StiReport1.Compile()
StiReport1.Show()

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

[aslan]

iman_22a عزيز بسيار متشكر از جوابي كه داديد و وقتي كه گذاشتيد

اگه ميشه در مورد""راه بهتري كه كد كمتري هم ميخواهد"" هم توضيح بدهيد . با تشكر

[iman_22a]

iman_22a عزيز بسيار متشكر از جوابي كه داديد و وقتي كه گذاشتيد

اگه ميشه در مورد""راه بهتري كه كد كمتري هم ميخواهد"" هم توضيح بدهيد . با تشكر

البته کمی کمترشو جا انداختی دوست عزیز . منظور توی ارتباط با استیمول نبود و فقط کدهای معمول بود .