asp.net中使用水晶报表（下）.txt

学习积累的代码段

Asp.Net中使用水晶报表（下） 
 




使用PUSH模式 
　　我们采用下面的几步使用Push模式执行水晶报表： 

　　1. 设计一个DataSet 

　　2. 创建一个.rpt文件同时将其指定给上一步建立的DataSet。 

　　3. 在aspx页面中拖放一个CrystalReportViewer控件同时将其与前面的rpt文件建立联系。 

　　4. 在代码中访问数据库并把数据存入DataSet 

　　5. 调用DataBind方法。 

　　设计一个DataSet 

　　1) 右击“解决方案浏览器”，选择“添加”--“添加新项”-->“数据集” 


　　2) 从“服务器资源管理器”中的“SQL Server”中拖放“Stores”表（位于PUBS数据库中）。 





　　3) 此时在数据集中就会有一个Stores表的结构图。 



　　- .xsd文件中仅仅包含一个结构图，但是不会有任何数据在里面。 

　　创建 .rpt 文件 : 

　　4) 使用上面的介绍过的方法创建此文件，唯一的不同就是使用数据集来代替前面的直接连接数据。 

　　5)建立.rpt文件之后，右击“详细资料”-->"添加／删除数据库“ 

　　6) 在”数据库专家“窗口中，展开”项目数据“（代替以前的OleDb），展开“ADO.Net数据集”--"DataSet1“，选择”Stores“表。 

　　7) 将”Stores"表添加到“选定的表”中，点击“OK” 



　　8) 使用PULL模式下的方法，建立一个WebForm 

　　建立一个Crystal Report Viewer 控件 

　　9) 建立一个Crystal Report Viewer 控件，并设定其属性，此处与PULL模式下是一致的。 

　　Code Behind 代码: 

　　10) 在Page_Load方法中使用下面的子函数： 

VB.Net代码： 

　　Sub BindReport() 

　　　　Dim myConnection As New SqlClient.SqlConnection() 

　　　　myConnection.ConnectionString= "server= (local)\NetSDK;database=pubs;Trusted_Connection=yes" 

　　　　Dim MyCommand As New SqlClient.SqlCommand() 

　　　　MyCommand.Connection = myConnection 

　　　　MyCommand.CommandText = "Select * from Stores" 

　　　　MyCommand.CommandType = CommandType.Text 

　　　　Dim MyDA As New SqlClient.SqlDataAdapter() 

　　　　MyDA.SelectCommand = MyCommand 

　　　　Dim myDS As New Dataset1() 

　　　　''这就是我们在设计模式上使用的DataSet 

　　　　MyDA.Fill(myDS, "Stores") 

　　　　''你不得不使用与你前面DataSet相同名字。 

　　　　Dim oRpt As New CrystalReport1() 

　　　　'' 水晶报表绑定 

　　　　oRpt.SetDataSource(myDS) 

　　　　'' 设定水晶报表的ReportSource 

　　　　CrystalReportViewer1.ReportSource = oRpt 

　　End Sub 



C#代码： 

private void BindReport() 

{ 

　　string strProvider = "Server=(local);DataBase=pubs;UID=sa;PWD="; 

　　CrystalReport1 oCR = new CrystalReport1(); 

　　Dataset1 ds = new Dataset1(); 

　　SqlConnection MyConn = new SqlConnection(strProvider); 

　　MyConn.Open(); 

　　string strSel = "Select * from Stores"; 

　　SqlDataAdapter MyAdapter = new SqlDataAdapter(strSel,MyConn); 

　　MyAdapter.Fill(ds,"stores"); 

　　oCR.SetDataSource(ds); 

　　this.CrystalReportViewer1.ReportSource = oCR; 

} 



　　注意：在上面的代码中，你得注意一下oRpt是"Strongly Typed"的报表文件。如果你需要使用"UnTyped"报表，你得使用ReportDocument对象，然后再调用报表文件。 

　　运行你的程序。 

　　11) 运行你的程序 

　　将报表文件导出成为其它格式 

　　你能够将报表文件导出成为下列格式： 

　　　　　　1. PDF (Portable Document Format) 

　　　　　　2. DOC (MS Word Document) 

　　　　　　3. XLS (MS Excel Spreadsheet) 

　　　　　　4. HTML (Hyper Text Markup Language – 3.2 or 4.0 compliant) 

　　　　　　5. RTF (Rich Text Format) 

　　使用Pull模式导出报表 

　　当导出使用Pull模式创建的文件时，水晶报表准确地打开所需要的数据，下面是执行导出功能的代码： 

C#代码: 

VB.Net代码: 

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click 

　　Dim myReport As CrystalReport1 = New CrystalReport1() 

　　''注意：这里我们建立一个strong-typed的水晶报表实例。 

　　　　Dim DiskOpts As CrystalDecisions.Shared.DiskFileDestinationOptions = New CrystalDecisions.Shared.DiskFileDestinationOptions() 

　　　　myReport.ExportOptions.ExportDestinationType = CrystalDecisions.[Shared].ExportDestinationType.DiskFile 

　　'' 导出成为其它文件时也需要这个选项 

　　'' 如Microsoft Exchange, MAPI等. 

　　　　myReport.ExportOptions.ExportFormatType = CrystalDecisions. [Shared].ExportFormatType.PortableDocFormat 

　　''这里我们导出成为.pdf格式文件，你也能选择上面的其它类型文件 

　　　　DiskOpts.DiskFileName = "c:\Output.pdf" 

　　''如果你不指定确切的目录，那么文件就会保存到［Windows]\System32目录中去了 

　　　　myReport.ExportOptions.DestinationOptions = DiskOpts 

　　''水晶报表文件不包含直接的FileName属性，因此你不能直接指定保存的文件名 

　　''所以你不得不使用DiskFileDestinationOptions对象，设置它的DiskFileName属性 

　　''为你想要的路径，最后将水晶报表的DestinationsOptions属性指定为上面的DiskFileDestinationOption 

　　　　myReport.Export() 

　　''上面的代码将完成导出工作。 

End Sub 



　　使用PUSH模式导出水晶报表 

　　当导出的报表是由PUSH模式建立的时，第一步就是通过编程建立连接并组装DataSet，设置报表的的SetDataSource属性。再下面的步骤就有Pull模式一样的了。