如何导出Crystal报表？！

2002-06-26 12:01:49 212 阅读 AI 写同款 · GEO 优化AI 选题数据监测一键分发 ›

Meditate 墨衍会员 · AI 创作全网分发关注 + 加入社区

水晶报表Crystal Reports实例 CrystalReports水晶报表的简单应用阅读详情

基于Web的应用程序怎样将报表导出到服务器上的特定目录中？
或者用其他方法将此报表以xls格式传递给最终用户？

请高人赐教！！！

...全文

SpringBoot水晶报表连接Oracle导出PDF教程目录一、系统环境以及测试内容 1.系统环境 2.测试内容二、设计水晶报表 1.CR2008配置jdbc (1)在数据库专家中创建新的连接 (2)输入JDBC连接信息 (3)输入用户名密码 (4)解决”未找到JDBC”驱动错误 (5)配置JDBC驱动 2.报表设计 (1)新建test.rpt报表 (2)添加参数字段 (3)设置图片地址 (4)报表预览三、SpringBoot项目搭建 1.新建SpringBoot项目 (1)pom.xml配置 (2)添加水晶报表文件阅读详情

Meditate

C# 111,128 成员 642,537 内容

+ 关注 + 加入社区

切换为时间正序

tianlon 2002-08-03

打赏
举报

收藏！

Meditate 2002-07-01

打赏
举报

yunmiaojing你说得没错！但是那实在winForm中，实现这些功能很简单！可是在Web 中就不一样了！
还请高人指点呀！

dason2u 2002-06-30

打赏
举报

同意楼上。不过那是在WinForm中。

yumiaojing 2002-06-28

打赏
举报

预览报表后，报表最上端不是有个按钮可以实现你所需的功能吗，而且还可以转换成其它格式呢

Meditate 2002-06-28

打赏
举报

楼上的仁兄，我按照文档中的代码作了，可是当我执行crReportDocument.Export时报错，说有另一个程序正在使用此报表，如何解决？

mmkk 2002-06-26

打赏
举报

借问一下:你的图形分析文件可以显示吗?

mmkk 2002-06-26

打赏
举报

请问一下,为什么我的crystal report图形分析文件没有办法显示?

lixigang 2002-06-26

打赏
举报

给你一个vb的函数看看：

Function ExportReport(ByVal crReportDocument As ReportDocument, ByVal PhysicalApplicationPath As String, ByVal FileName As String, ByVal format As String) As String
' This subroutine uses a case statement to determine the selected export format from the dropdownlist
' menu and then sets the appropriate export options for the selected export format. The report is
' exported to a subdirectory called "Exported".

'Check to see if the application directory has a subdirectory called "Exported".
'If not, create the directory since exported files will be placed here.
'This uses the Directory class of the System.IO namespace.

'PhysicalApplicationPath = request.PhysicalApplicationPath

Dim ExportPath As String
ExportPath = PhysicalApplicationPath + "Exported\"
If Directory.Exists(ExportPath) = False Then
Directory.CreateDirectory(PhysicalApplicationPath + "Exported\")
End If

Dim crExportOptions As ExportOptions
Dim crDiskFileDestinationOptions As DiskFileDestinationOptions

' First we must create a new instance of the diskfiledestinationoptions class and
' set variable called crExportOptions to the exportoptions class of the reportdocument.
crDiskFileDestinationOptions = New DiskFileDestinationOptions()
crExportOptions = crReportDocument.ExportOptions

'Find the export type specified in the dropdownlist and export the report. The possible export format
'types are Rich Text(RTF), Portable Document (PDF), MS Word (DOC), MS Excel (XLS), Crystal Report (RPT),
'HTML 3.2 (HTML) and HTML 4.0 (HTML)
'
'Though not used in this sample application, there are options that can be specified for various format types.
'When exporting to Rich Text, Word, or PDF, you can use the PdfRtfWordFormatOptions class to specify the
'first page, last page or page range to be exported.
'When exporting to Excel, you can use the ExcelFormatOptions class to specify export properties such as
'the column width etc.

Select Case format 'this contains the value of the selected export format.

Case "RTF" '"Rich Text (RTF)"
'--------------------------------------------------------------------
'Export to RTF.

'append a filename to the export path and set this file as the filename property for
'the DestinationOptions class
crDiskFileDestinationOptions.DiskFileName = ExportPath + FileName + ".rtf"

'set the required report ExportOptions properties
With crReportDocument.ExportOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.RichText
.DestinationOptions = crDiskFileDestinationOptions
End With
'--------------------------------------------------------------------
Case "PDF" '"Portable Document (PDF)"
'Export to PDF

'append a filename to the export path and set this file as the filename property for
'the DestinationOptions class
crDiskFileDestinationOptions.DiskFileName = ExportPath + FileName + ".pdf"

'set the required report ExportOptions properties
With crExportOptions
.DestinationOptions = crDiskFileDestinationOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.PortableDocFormat
End With
'--------------------------------------------------------------------
Case "DOC" '"MS Word (DOC)"
'Export to Word

'append a filename to the export path and set this file as the filename property for
'the DestinationOptions class
crDiskFileDestinationOptions.DiskFileName = ExportPath + FileName + ".doc"

'set the required report ExportOptions properties
With crReportDocument.ExportOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.WordForWindows
.DestinationOptions = crDiskFileDestinationOptions
End With
'--------------------------------------------------------------------
Case "XLS" '"MS Excel (XLS)"
'Export to Excel

'append a filename to the export path and set this file as the filename property for
'the DestinationOptions class
crDiskFileDestinationOptions.DiskFileName = ExportPath + FileName + ".xls"

'set the required report ExportOptions properties
With crReportDocument.ExportOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.Excel
.DestinationOptions = crDiskFileDestinationOptions
End With
'--------------------------------------------------------------------
Case "RPT" '"Crystal Report (RPT)"
'Export to Crystal reports:

'append a filename to the export path and set this file as the filename property for
'the DestinationOptions class
crDiskFileDestinationOptions.DiskFileName = ExportPath + FileName + ".rpt"

'set the required report ExportOptions properties
With crReportDocument.ExportOptions
.ExportDestinationType = ExportDestinationType.DiskFile
.ExportFormatType = ExportFormatType.CrystalReport
.DestinationOptions = crDiskFileDestinationOptions
End With
End Select 'export format

'Once the export options have been set for the report, the report can be exported. The Export command
'does not take any arguments
' Try
' Export the report
crReportDocument.Export()
ExportReport = ""
' Catch Err As Exception
' ExportReport = Err.Message.ToString
' End Try

End Function

如何导出Crystal报表？！

相关推荐