نمایش نتایج 1 تا 4 از 4

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

  1. #1
    کاربر دائمی
    تاریخ عضویت
    بهمن 1381
    محل زندگی
    Iran
    پست
    776

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

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

    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;
    }

  2. #2
    کاربر دائمی آواتار iman_22a
    تاریخ عضویت
    بهمن 1383
    محل زندگی
    اهواز
    پست
    815

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

    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("GroupHe aderBand1"), 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()


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

  3. #3
    کاربر دائمی
    تاریخ عضویت
    بهمن 1381
    محل زندگی
    Iran
    پست
    776

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

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

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

  4. #4
    کاربر دائمی آواتار iman_22a
    تاریخ عضویت
    بهمن 1383
    محل زندگی
    اهواز
    پست
    815

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

    نقل قول نوشته شده توسط aslan مشاهده تاپیک
    iman_22a عزيز بسيار متشكر از جوابي كه داديد و وقتي كه گذاشتيد

    اگه ميشه در مورد""راه بهتري كه كد كمتري هم ميخواهد"" هم توضيح بدهيد . با تشكر
    البته کمی کمترشو جا انداختی دوست عزیز . منظور توی ارتباط با استیمول نبود و فقط کدهای معمول بود .

قوانین ایجاد تاپیک در تالار

  • شما نمی توانید تاپیک جدید ایجاد کنید
  • شما نمی توانید به تاپیک ها پاسخ دهید
  • شما نمی توانید ضمیمه ارسال کنید
  • شما نمی توانید پاسخ هایتان را ویرایش کنید
  •