مکس طولانی موقع لود شدن گزارش ساخته شده با stimul

[مهدی د]

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

report1.Compile()

می رسد مکس خیلی طولانی مواجه می شوم ، برای رفع این مشکل چه باید کرد؟

Dim Oda As OleDbDataAdapter

        Dim ods As New DataSet

        Oda = New OleDbDataAdapter("SELECT tblCh.* FROM tblCh", Ocn)

        Oda.Fill(ods, "tblCh")

        Dim tblCh As New DataView

        tblCh = ods.Tables("tblCh").DefaultView

        Dim report1 As New StiReport

        report1.RegData(tblCh)

        report1.Load(Application.StartupPath & "\RptB.mrt")

        report1.Compile()

        report1.Show()

[مهدی د]

با سلام
لطفا اگه کسی می دونه راهنمایی کنه

[Mani_rf]

احتمالا حجم اطلاعاتت زیاده طول میکشه تا رندر کنه. چرا کد SQL رو تو خود ریپورت نمی نویسی؟ اینطوری خیلی سریعتر عمل میکنه.

[shahryari]

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

report1.Compile()

می رسد مکس خیلی طولانی مواجه می شوم ، برای رفع این مشکل چه باید کرد؟

Dim Oda As OleDbDataAdapter

        Dim ods As New DataSet

        Oda = New OleDbDataAdapter("SELECT tblCh.* FROM tblCh", Ocn)

        Oda.Fill(ods, "tblCh")

        Dim tblCh As New DataView

        tblCh = ods.Tables("tblCh").DefaultView

        Dim report1 As New StiReport

        report1.RegData(tblCh)

        report1.Load(Application.StartupPath & "\RptB.mrt")

        report1.Compile()

        report1.Show()

سلام
report1.Compile() را حذف کن

[مهدی د]

احتمالا حجم اطلاعاتت زیاده طول میکشه تا رندر کنه. چرا کد SQL رو تو خود ریپورت نمی نویسی؟ اینطوری خیلی سریعتر عمل میکنه.

برای اولین بار که دستور نمایش یک گزارش داده می شه ، زمانی زیادی صرف می شه تا گزارش لود بشه ولی برای بار دوم به بعد دیگه طول نمیکشه! در ضمنreport1.Compile رو حذف کردم ولی مشکل برطرف نشد!

[مهدی د]

چرا کد SQL رو تو خود ریپورت نمی نویسی؟ اینطوری خیلی سریعتر عمل میکنه.

چجوری می شه اینکارو کرد؟

[Fery666]

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

  strep.Load(Application.StartupPath & "\List_Report.mrt")

                    strep.Dictionary.Databases.Add(New Stimulsoft.Report.Dictionary.StiOleDbDatabase("Con  nection", StrCon))

                    strep.Dictionary.Variables("var2").Value = "select * From tb_Moshakhasat"

                    strep.Compile()

                    strep.Show()

باید یه Variables به اسم var2 درست کنی بعد قسمت Query گزارشت بزاری .
بعد با دستوری که به var2 میفرستی می تونی گزارشت رو فیلتر یا هر کاری انجم بدی .

[arman_Delta2002]

من هم چند بار این مشکل رو داشتم فایل های پوشه Obj با debug رو پاک کردم درست شد

[مهدی د]

سلام
فایلها رو حذف کردم درست نشد پس مشکل از چیه؟ لازم به ذکر است که من گزارشات رو در Solution explorer ندارم و فقط اونها رو در یک پوشه ذخیره کردم. ممکنه مشکل از این باشه؟

[arman_Delta2002]

نه من هم همین روش شما رو میرم یه مدت اینطوری شد با پاک کردن اون 2 تا پوشه مشکلم یه مدت حل میشد و دواره اینطوری میشد بعد ویندوز عوض کردم و ورژن جدیدتر دیگه این مشکل رو نداشتم تا حالا