导出后我的excel2003工具栏丢失了

时间:2013-06-21 03:48:49

标签: asp.net vb.net crystal-reports

我使用下面的代码将我的报告导出到excel,它在excel2007中运行正常,但是对于excel2003,工具栏丢失了,我甚至无法保存,发生了什么事?

  strFileName = Server.MapPath(EIMSCore.SysConfigEngine.SysConfig.fncGetExportFolderPath()) & "Report" & strFileID.NewGuid().ToString() & ".xls"
                crDiskFileDesOpts.DiskFileName = strFileName
                crExportOpts.ExportFormatType = ExportFormatType.Excel
                crMainReport.Export()
                'mersad00
                EIMSCore.EIMSCommon.General.ReleaseReportObject(crMainReport)
                With Response
                    .ClearContent()
                    .ClearHeaders()
                    .ContentType = "application/vnd.ms-excel"
                    .WriteFile(crDiskFileDesOpts.DiskFileName)
                    .Flush()
                    .Close()
                End With

1 个答案:

答案 0 :(得分:0)

这不一定是您的代码问题。尝试通过打开注册表来重置Excel工具栏,导航到\HKEY_CURRENT_USER \ Software \ Microsoft \ Office \ <Version> \ Common \ Toolbars \ Settings并删除Microsoft Excel条目(当然,在进行备份之后)。然后再次运行您的代码,看看工具栏是否再次消失。

但我怀疑这是巧合。