wuliao5945 发表于 2020-5-18 12:07:59

当渲染模式选择HtmlViewer,检索出报表后,再点导出,会出现”报表不可用”的提示

当渲染模式选择ViewerType="HtmlViewer"时,点击检索出报表后,再点导出,会出现”报表不可用”的提示,之后导出正常

不点,直接导出则正常
渲染模式选择ViewerType="RAWHtml"也正常
是BUG吗
开发的系统中报表使用折叠效果,必须使用HtmlViewer模式,怎么才能不显示”报表不可用”的提示前台代码:
<ActiveReportsWeb:WebViewer ID="WebViewer1" runat="server" Height="1000" Width="700" ViewerType="HtmlViewer"></ActiveReportsWeb:WebViewer>
后台代码:

    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load


    End Sub
    ''' <summary>
    ''' 查询
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    Protected Sub btnQuery_Click(sender As Object, e As EventArgs) Handles btnQuery.Click
      Dim rpt As GrapeCity.ActiveReports.PageReport = New GrapeCity.ActiveReports.PageReport(New System.IO.FileInfo(Server.MapPath("DataReport.rdlx")))

      AddHandler rpt.Document.LocateDataSource, AddressOf Me.runtime_LocateDataSource
      Me.WebViewer1.Report = rpt
    End Sub


    ''' <summary>
    ''' 导出
    ''' </summary>
    ''' <param name="sender"></param>
    ''' <param name="e"></param>
    Protected Sub BtExcel_Click(sender As Object, e As EventArgs) Handles BtExcel.Click
      'Provide the page report you want to render.
      Dim _reportDef As New GrapeCity.ActiveReports.PageReport(New System.IO.FileInfo(Server.MapPath("RdlReportTest.rdlx")))'DataReportExcel.rdlx
      Dim _reportRuntime As New GrapeCity.ActiveReports.Document.PageDocument(_reportDef)
      'AddHandler _reportRuntime.LocateDataSource, AddressOf Me.runtime_LocateDataSource
      Dim ms As New System.IO.MemoryStream()
      ' Provide settings for your rendering output.
      Dim excelSetting As New GrapeCity.ActiveReports.Export.Excel.Page.ExcelRenderingExtensionSettings()
      excelSetting.FileFormat = GrapeCity.ActiveReports.Export.Excel.Page.FileFormat.Xls
      excelSetting.MultiSheet = False
      Dim setting As GrapeCity.ActiveReports.Extensibility.Rendering.ISettings = excelSetting
      'Set the rendering extension and render the report.
      Dim excelRenderingExtension As New GrapeCity.ActiveReports.Export.Excel.Page.ExcelRenderingExtension()
      Dim outputProvider As New GrapeCity.ActiveReports.Rendering.IO.MemoryStreamProvider()
      _reportRuntime.Render(excelRenderingExtension, outputProvider, excelSetting.GetSettings())
      Response.ContentType = "application/vnd.ms-excel"
      Response.AddHeader("content-disposition", "inline;filename=ActiveReport" + DateTime.Now.ToString("yyyyMMddhhmmss") + ".xls")
      outputProvider.GetPrimaryStream().OpenStream().CopyTo(ms)
      Response.BinaryWrite(ms.ToArray())
      'Response.End();
      Context.ApplicationInstance.CompleteRequest()
      '''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''''
    End Sub


Demo已经发到你们邮箱中

KearneyKang 发表于 2020-5-18 16:18:56

问题,已经收到,这个需要进行代码调试看看具体问题。需要一点时间

wuliao5945 发表于 2020-5-27 08:06:02

问题有进展了吗

KearneyKang 发表于 2020-5-27 09:09:06

马上去看

wuliao5945 发表于 2020-6-4 14:19:16

怎么样了,我把导出换成别的方式还是显示 报表不可用,和导出没关系呀,换成其他按钮也是这样

KearneyKang 发表于 2020-6-4 16:08:38

问题很诡异

wuliao5945 发表于 2020-6-5 13:48:40

是你们的bug不,还是需要再加载点儿什么

KearneyKang 发表于 2020-6-5 14:50:07

本帖最后由 KearneyKang 于 2020-6-5 16:05 编辑

由于我机器没有13现在安装了13还在调试条码。我这边只要问题重现了就应该可以给你解决,你先等下,由于14跟13不兼容所以这个有点花时间,我昨天已经安装了13等下就去调试代码
代码调整完毕,我这边根据你提供的代码么有出现你反馈的问题,然后我们唯一不同的就是我使用的是AR13.2的版本
你使用AR13.2的这个版本看看能不能解决你的问题
页: [1]
查看完整版本: 当渲染模式选择HtmlViewer,检索出报表后,再点导出,会出现”报表不可用”的提示