最近接到的案子是用.NET 2003+Crystal Report, 用水晶報表不是第一次了,

這次把所學到讀到的筆記整理下來, 讓之後的自己可以參考

當然, 也謝謝敎我, 幫我debug的同事b大囉

建立步驟：

1.      建立水晶報表的模板

在專案中按右鍵à加入新項目à Crystal Reportà加入一個空白報表, 並設計出自己想要的格式

2.      建立資料集

在專案中按右鍵à加入新項目à資料集à加入一空白資料集

點進該資料集, 將報表所要顯示的資料表結構定義在此(最簡單的方法即是利用伺服器總管, 直接拖拉出想要的資料表結構定義, 再慢慢調整)

資料集中的皆只是資料結構定義, 非實體的資料, 用處在於將此資料定義放入水晶報表的模板中, 實體的資料會在程式中即時run出來

3.      在水晶報表中放置資料欄位

回到水晶報表, 點開後, 在左方的”欄位總管” 定義該報表的資料來源為2.的資料集(如下圖一, 二)

作法: 按右鍵à新增/移除資料庫, 在”更多的資料來源”àADO.NET(XML)à建立新的連結 按兩下, 會跳出一視窗讓我們輸入XML檔路徑, 在此輸入2.做好的XSD檔的路徑

 

部落格專用相簿



選好後, 該節點下就有剛資料集的資料, 如果該資料集有多個資料表也可以在此看到, 選取所要顯示在報表上的資料表並移到右邊的”選取的資料表”方框, 按下”確定”

做好後, 在”資料庫欄位”節點下就會顯示出剛剛連好的資料集, 我們就可以使用該資   料集下的欄位囉(用法:直接將要顯示的欄位拖拉至報表中所想要顯示的位置)

做好後, 在”資料庫欄位”節點下就會顯示出剛剛連好的資料集, 我們就可以使用該資料集下的欄位囉(用法:直接將要顯示的欄位拖拉至報表中所想要顯示的位置)

4.      在AP中寫程式連結報表

再網頁中拖拉進一個CrystalReportViewer跟一個DataGrid

在Page_Loa中寫下列程式連結報表

(要先引入CrystalDecisions.CrystalReports.Engine跟CrystalDecisions.Shared這兩個命名空間)

Dim myconn As SqlConnection = New  SqlConnection("Server=SERVER;Database=DB;UID=User;PWD=;")

        Dim cmd As New SqlCommand

        Dim conn As String

        myconn.Open()

        '先將資料撈出顯示於Gridview

        Dim sql As String

        sql = "Select UserID from TSUser where UserId <='008'"

        cmd.CommandText = sql

        cmd.Connection = myconn

        Dim ds As New DataSet

        Dim adp As New SqlDataAdapter

        adp.SelectCommand = cmd

        adp.Fill(ds)

        Me.DataGrid1.DataSource = ds

        Me.DataGrid1.DataBind()

        '將資料顯示於水晶報表

        Dim MyReport As New CrystalDecisions.CrystalReports.Engine.ReportDocument

        MyReport.Load(Server.MapPath("CrystalReport2.rpt"))

        Dim i As Integer

        MyReport.Database.Tables.Item(0).SetDataSource(ds.Tables(0))

        Me.CrystalReportViewer1.DisplayGroupTree = False

        Me.CrystalReportViewer1.ReportSource = MyReport

        Me.CrystalReportViewer1.DataBind()

5.      存檔, 執行

就會發現報表已順利產生出來囉