数据导出问题？

Question

操作数据源，如DataTable或DataSet

Answer 1

我这里有个组件，你需要的话可以和我联系！
msn:[email protected]

Answer 2

对了，忘记告诉你，是把DataSet中的数据导入到Excel和Word！

Answer 3

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
　　Dim myReport As CrystalReport1 = New CrystalReport1()
　　　　Dim DiskOpts As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions()
　　　　myReport.ExportOptions.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile
　　　　myReport.ExportOptions.ExportFormatType = CrystalDecisions.[Shared].ExportFormatType.Excel
　　
　　　　DiskOpts.DiskFileName = "c:\Output.xsl"
　　　　myReport.Export()
End Sub