在很多的應用程序中，報表是不可缺少的，一張好的報表能直觀(guān)地讓人把握數據的情況，方便決策。在這篇文章中，我們將以一個(gè)三層結構的asp.net程序為例，介紹如何使用crystal report ，來(lái)制作一份報表，其中介紹了不少asp.net和水晶報表的技巧。
在這個(gè)例子中，我們設想的應用要為一個(gè)銷(xiāo)售部門(mén)制作一份報表，管理者可以查看某段時(shí)間之內的銷(xiāo)售情況，以列表或者折線(xiàn)圖的形式反映出銷(xiāo)售的趨勢。我們將使用SQL Server 2000做為數據庫，使用VB.NET編寫(xiě)中間層邏輯層，而前端的表示層使用C#。我們先來(lái)看下數據庫的結構。
其中，tbitem表中存放的是每張訂單中所訂購的貨品，tbsales存放的是每張訂單，tblsalesperson是銷(xiāo)售員表，存放該出版社的每位銷(xiāo)售員。
接下來(lái)，使用SQL Server 2000來(lái)創(chuàng )建這些表。表的結構如下所示：
CREATE TABLE [dbo].[tblItem] (
[ItemId] [int] NOT NULL ,
[Description] [varchar] (50) NOT NULL
) ON [PRIMARY]
CREATE TABLE [dbo].[tblSalesPerson] (
[SalesPersonId] [int] NOT NULL ,
[UserName] [varchar] (50) NOT NULL ,
[Password] [varchar] (30) NOT NULL
) ON [PRIMARY]
CREATE TABLE [dbo].[tblSales] (
[SaleId] [int] IDENTITY (1, 1) NOT NULL ,
[SalesPersonId] [int] NOT NULL ,
[ItemId] [int] NOT NULL ,
[SaleDate] [datetime] NOT NULL ,
[Amount] [int] NOT NULL
) ON [PRIMARY]
并且用以下的代碼創(chuàng )建表之間的約束關(guān)系。
ALTER TABLE tblItem
ADD CONSTRAINT PK_ItemId
PRIMARY KEY (ItemId)
GO
ALTER TABLE tblSalesPerson
ADD CONSTRAINT PK_SalesPersonId
PRIMARY KEY (SalesPersonId)
GO
ALTER TABLE tblSales
ADD CONSTRAINT FK_ItemId
FOREIGN KEY (ItemId) REFERENCES tblItem(ItemId)
GO
ALTER TABLE tblSales
ADD CONSTRAINT FK_SalesPersonId
FOREIGN KEY (SalesPersonId) REFERENCES tblSalesPerson(SalesPersonId)
GO
創(chuàng )建中間邏輯層
在中間邏輯層組件中，我們?yōu)槊恳粡埍矶紕?chuàng )建兩個(gè)類(lèi)。比如，對于tblItems表，創(chuàng )建item 和items類(lèi)。Item類(lèi)中記錄每件銷(xiāo)售的貨品的詳細情況，而items表則記錄所有銷(xiāo)售的貨品并且有增加貨品的方法。這樣，就存在下面的六個(gè)類(lèi)：
Item and Items
SalesPerson and SalesPersons
Sale and Sales
接下來(lái)，看一下每個(gè)類(lèi)中的屬性：
Item類(lèi)
包括如下屬性
ItemId （貨品id編號）
Description （貨品的描述）
Items
有一個(gè)方法，將根據item的編號返回一個(gè)item對象
Public Function GetAllItems () As Collections.ArrayList
SalesPerson
該類(lèi)有以下三個(gè)屬性:
SalesPersonId （銷(xiāo)售員編號）
Name （姓名）
Password （密碼）
SalesPersons
有一個(gè)方法，根據銷(xiāo)售員登陸時(shí)輸入的用戶(hù)名和密碼，在數據庫中，驗證銷(xiāo)售員的登陸是否正確，如果正確，則返回零。
Public Function ValidateUser (strUserName as String, strPassword as String) As Integer
Sale
有如下5個(gè)屬性
· SaleId
· SalesPersonId
· ItemId
· SaleDate
· Amount
Sales
有兩個(gè)方法，其中g(shù)etsales根據輸入的參數返回sales對象的集合
Public Function GetSales (Optional nSaleId As Integer = 0, Optional nSalesPersonId As Integer = 0，Optional nItemId As Integer = 0) As Collections.ArrayList
還有一個(gè)addsales方法，用于增加一張訂單
Public Function AddSale (objSale As Sale)
創(chuàng )建表現層頁(yè)面
接下來(lái)，開(kāi)始創(chuàng )建表現層頁(yè)面。首先，要創(chuàng )建一個(gè)可以給銷(xiāo)售員登陸的頁(yè)面，如下圖所示。
在銷(xiāo)售員成功登陸后，可以給銷(xiāo)售員輸入某樣貨品銷(xiāo)售的數量，如下圖：
此外，為了給業(yè)務(wù)主管看到某個(gè)時(shí)期的銷(xiāo)售情況，創(chuàng )建如下頁(yè)面。
其中，業(yè)務(wù)主管可以選擇查看某樣貨品在某個(gè)時(shí)期（選擇開(kāi)始日期，結束日期）的銷(xiāo)售情況，以圖表方式顯示。
這里特別值得一提的是，日歷控件的使用。在頁(yè)面中放置日歷控件后，設置如下代碼：
＜input type="image" onclick="Page_ValidationActive=false;" src="datepicker.gif" alt="Show Calender" runat="server" onserverclick="ShowCal1" id="ImgCal1" name="ImgCal1"＞
這里設置page_validationactive參數為false,所以不需要重新提交頁(yè)面，并且，在onserverclick事件中，設置處理的代碼，如下所示：
public void ShowCal1(Object sender, System.Web.UI.ImageClickEventArgs e)
{ //顯示日歷控件
DtPicker1.Visible = true;
}
當用戶(hù)選擇了相關(guān)的日期后，在文本框中可以獲得相關(guān)的日期：
private void DtPicker1_SelectionChanged(object sender, System.EventArgs e)
{
txtStartDate.Text = DtPicker1.SelectedDate.ToShortDateString();
DtPicker1.Visible = false;
}
在提交的頁(yè)面中，處理的代碼如下：
private void bSubmit_ServerClick(object sender, System.EventArgs e)
{
Response.Redirect("ViewReport.aspx?ItemId=" + cboItemType.SelectedItem.Value + "&StartDate=" + txtStartDate.Text + "&EndDate=" + txtEndDate.Text);}
在提交頁(yè)面后，將跳轉到瀏覽報表的頁(yè)面viewreport.aspx,傳入相關(guān)的參數，如貨品ID，開(kāi)始和結束日期。
用水晶報表創(chuàng )建報表
首先，往窗體中添加水晶報表控件，之后，就可以用水晶報表的報表設計器設計一份報表了。新建一個(gè)水晶報表文件類(lèi)型，命名為itemreport.rpt,接著(zhù)使用報表設計專(zhuān)家，并選擇設計標準型的報表，點(diǎn)下一步，出現如下畫(huà)面：
我們選擇使用ADO類(lèi)型的數據，在彈出的窗口中，設置好sql server的登陸名，登陸密碼，選擇好數據庫后，選擇在報表中使用tblsales表，如下圖：
接著(zhù)選Next,在要在報表中顯示的字段中，選擇SaleDate和Amount。之后，一直選NEXT，忽略其他相關(guān)設置，最后，在圖表類(lèi)型中選擇折線(xiàn)圖，如下圖：
最后點(diǎn)擊finish,可以看到如下的報表：
再次選擇報表專(zhuān)家，在彈出的窗口中選擇數據頁(yè)，在數據可用字段中選擇salesdate,并且可以在文本頁(yè)中，設置適當的報表標題。
由于要根據輸入的日期，貨品參數來(lái)動(dòng)態(tài)顯示報表，因此我們要設置參數字段。在報表設計器中，在字段資源管理器中，選擇參數字段，鼠標右擊選擇“新建”，新建如下三個(gè)參數字段。
名稱(chēng): 類(lèi)型：
ItemId Number
StartDate Date
EndDate Date
最后，要設置相關(guān)的查詢(xún)公式，在除報表頁(yè)眉的區域，鼠標右鍵點(diǎn)擊，在彈出菜單中選擇“報表|編輯選擇公式|記錄”，輸入如下的公式：
在上面的公式編輯器中，分為左中右三部分，左邊的是報表的字段，中間的是相關(guān)的功能函數，最右邊的是運算符，雙擊其中選中的部分，則可以添加到下部的公式顯示區域中。最后，保存建立的公式。
在程序中使用報表
接下來(lái)，我們可以在程序中用代碼處理和報表的連接過(guò)程。首先，在工程項目中，增加如下的兩個(gè)命名空間的引用（注意，在代碼中也必須用using引入它們）：
CrystalDecisions.CrystalReports.Engine
CrystalDecisions.Shared
在viewreport.aspx的Page_load事件中，加入以下代碼
//接收傳遞的參數
nItemId = int.Parse(Request.QueryString.Get("ItemId"));
strStartDate = Request.QueryString.Get("StartDate");
strEndDate = Request.QueryString.Get("EndDate");
//聲明報表的數據對象
CrystalDecisions.CrystalReports.Engine.Database crDatabase; CrystalDecisions.CrystalReports.Engine.Table crTable;
TableLogOnInfo dbConn = new TableLogOnInfo();
// 創(chuàng )建報表對象opt
ReportDocument oRpt = new ReportDocument();
// 加載已經(jīng)做好的報表
oRpt.Load("F:\\aspnet\\WroxWeb\\ItemReport.rpt");
//連接數據庫，獲得相關(guān)的登陸信息
crDatabase = oRpt.Database;
//定義一個(gè)arrtables對象數組
object[] arrTables = new object[1];
crDatabase.Tables.CopyTo(arrTables, 0);
crTable = (CrystalDecisions.CrystalReports.Engine.Table)arrTables[0]; dbConn = crTable.LogOnInfo;
//設置相關(guān)的登陸數據庫的信息
dbConn.ConnectionInfo.DatabaseName = "WroxSellers"; dbConn.ConnectionInfo.ServerName = "localhost";
dbConn.ConnectionInfo.UserID = "sa";
dbConn.ConnectionInfo.Password = "test";
//將登陸的信息應用于crtable表對象
crTable.ApplyLogOnInfo(dbConn);
//將報表和報表瀏覽控件綁定
crViewer.ReportSource = oRpt;
//傳遞參數
setReportParameters();
在上面的代碼中，首先接收了日期，貨品編號等參數，并實(shí)例化了Database, Table和 TableLogOnInfo 三個(gè)類(lèi)，它們是用來(lái)在運行時(shí)，建立報表和數據庫的連接必需的。再使用
oRpt.Load("F:\\aspnet\\WroxWeb\\ItemReport.rpt");
來(lái)裝載已經(jīng)做好了的報表。
在裝載完報表后，將數據庫中要使用的表復制到一個(gè)對象數組中去，并選擇對象數組中的第一個(gè)表元素，將其轉換為水晶報表的報表對象。接著(zhù)，再設置LOGONINFO中的登陸數據庫的信息。最后，將報表源與報表瀏覽控件綁定。
傳遞參數到水晶報表
定義一個(gè)新的過(guò)程，setReportParameters()，代碼如下：
private void setReportParameters()
{
// all the parameter fields will be added to this collection
ParameterFields paramFields = new ParameterFields();
// the parameter fields to be sent to the report
ParameterField pfItemId = new ParameterField();
ParameterField pfStartDate = new ParameterField();
ParameterField pfEndDate = new ParameterField();
// 設置在報表中，將要接受的參數字段的名稱(chēng)
pfItemId.ParameterFieldName = "ItemId";
pfStartDate.ParameterFieldName = "StartDate";
pfEndDate.ParameterFieldName = "EndDate";
ParameterDiscreteValue dcItemId = new ParameterDiscreteValue();
ParameterDiscreteValue dcStartDate = new ParameterDiscreteValue(); ParameterDiscreteValue dcEndDate = new ParameterDiscreteValue();
dcItemId.Value = nItemId;
dcStartDate.Value = DateTime.Parse(strStartDate);
dcEndDate.Value = DateTime.Parse(strEndDate);
pfItemId.CurrentValues.Add(dcItemId);
pfStartDate.CurrentValues.Add(dcStartDate); pfEndDate.CurrentValues.Add(dcEndDate);
paramFields.Add(pfItemId);
paramFields.Add(pfStartDate);
paramFields.Add(pfEndDate);
// 將參數集合綁定到報表瀏覽控件
crViewer.ParameterFieldInfo = paramFields;
}
現在來(lái)解釋一下上面的代碼。在水晶報表中，瀏覽器控件有一個(gè)屬性parameterfieldsinfo,該屬性可以通過(guò)綁定parameterfields類(lèi)型的集合，將相關(guān)的參數的實(shí)際數值傳遞到報表。Parameterfields類(lèi)型集合通過(guò)add的方法，接收Parameterfield類(lèi)型的對象。因此，我們先為itemid,startdate,enddate三個(gè)參數創(chuàng )建parameterfield類(lèi)型的對象，并且設置它們對應報表中接受參數的名稱(chēng)：
ParameterFields paramFields = new ParameterFields();
ParameterField pfItemId = new ParameterField();
ParameterField pfStartDate = new ParameterField();
ParameterField pfEndDate = new ParameterField();
// 設置在報表中，將要接受的參數字段的名稱(chēng)
pfItemId.ParameterFieldName = "ItemId";
pfStartDate.ParameterFieldName = "StartDate";
pfEndDate.ParameterFieldName = "EndDate";
接著(zhù)，可以為這些參數字段設置具體的值了，但由于parameterfield必須接受P arameterDiscreteValue類(lèi)型的對象，所以，再創(chuàng )建相關(guān)的實(shí)例：
ParameterDiscreteValue dcItemId = new ParameterDiscreteValue();
ParameterDiscreteValue dcStartDate = new ParameterDiscreteValue();
ParameterDiscreteValue dcEndDate = new ParameterDiscreteValue();
dcItemId.Value = nItemId;
dcStartDate.Value = DateTime.Parse(strStartDate);
dcEndDate.Value = DateTime.Parse(strEndDate);
最后，就可以在三個(gè)parameterfield的對象中的currentvalues中設置它們的值，并往paramFields集合中加進(jìn)這三個(gè)parameterfield對象。
運行的結果如下。
來(lái)源：網(wǎng)絡(luò )
