1,可能rpt需要的field你所提供的数据集没有完全提供.
2,以下使我倒出成Excel的实例,你可以参考一下,已经测试成功.
Dim myExportOptions As New CrystalDecisions.Shared.ExportOptions()
Dim myDiskFileDestinationOptions As New CrystalDecisions.Shared.DiskFileDestinationOptions()
Dim myFormatTypeOptions As New CrystalDecisions.Shared.ExcelFormatOptions() 'myDiskFileDestinationOptions.DiskFileName = "G:\BankWorks2\VB.net\cptRhett1.xls"
myDiskFileDestinationOptions.DiskFileName = strDestinationNOW & "\" & Mid(RPTFileName, InStrRev(RPTFileName, "\"), InStrRev(RPTFileName, ".") - InStrRev(RPTFileName, "\")) & "(" & DateString.ToString & ").xls"
myExportOptions = myreport.ExportOptions
With myExportOptions
.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.Excel
.DestinationOptions = myDiskFileDestinationOptions
.FormatOptions = myFormatTypeOptions End With
myreport.Export()
2,以下使我倒出成Excel的实例,你可以参考一下,已经测试成功.
Dim myExportOptions As New CrystalDecisions.Shared.ExportOptions()
Dim myDiskFileDestinationOptions As New CrystalDecisions.Shared.DiskFileDestinationOptions()
Dim myFormatTypeOptions As New CrystalDecisions.Shared.ExcelFormatOptions() 'myDiskFileDestinationOptions.DiskFileName = "G:\BankWorks2\VB.net\cptRhett1.xls"
myDiskFileDestinationOptions.DiskFileName = strDestinationNOW & "\" & Mid(RPTFileName, InStrRev(RPTFileName, "\"), InStrRev(RPTFileName, ".") - InStrRev(RPTFileName, "\")) & "(" & DateString.ToString & ").xls"
myExportOptions = myreport.ExportOptions
With myExportOptions
.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.Excel
.DestinationOptions = myDiskFileDestinationOptions
.FormatOptions = myFormatTypeOptions End With
myreport.Export()
解决方案 »
- 是不是'可空类型'的equals又改变了....
- 一个数据更新的问题,怎么不生效啊?各位帮我看看呀!!!!!
- 如何在C#中将密码变成星号啊
- 任何使用Button控制使用不同的资源文件!
- Repeater里设置radiobutton的groupname问题
- 验证控件的问题
- 怎么样保存为.aspx文件---我是初学者谢谢
- 如何在DataGrid的HyperLinkColumn列放两个字段
- 谁能给一个用soap进行通讯的web server的例子
- 如何用C#程序关闭WEb窗体
- 我在oracle中间了一个存储过程,返回值的类型是cursor,但是我在asp.net中不知道该如何通过这个执行存储过程得到记录集,高手们,帮帮忙
- 请问专家:用什么工具和办法来理清统计系统的各数据之间以及与报表之间的关系?
另外我用CrystalReportViewer显示正常,就是导入时myrpt.Export();//此行执行时报错!!!!
' 声明变量并获取导出选项。
Dim exportOpts As New ExportOptions
Dim diskOpts As New DiskFileDestinationOptions
exportOpts = Report.ExportOptions ' 设置导出格式。
exportOpts.ExportFormatType = ExportFormatType.PortableDocFormat
exportOpts.ExportDestinationType = ExportDestinationType.DiskFile ' 设置磁盘文件选项。
diskOpts.DiskFileName = fileName
exportOpts.DestinationOptions = diskOpts If System.IO.File.Exists(fileName) Then
File.Delete(fileName)
Else
End If ' 导出报表。
Report.Export()
End Sub