|
1. 新建一個(gè)字符串類型的參數(shù)字段,名稱為 URL,用于傳遞 ASP.NET 程序的網(wǎng)址和網(wǎng)址的部分參數(shù)。比如:"http://www.nt.cn/cr.aspx?sort_field="。
2. 右擊作為表頭的文本字段,選擇"設(shè)置文本格式",進(jìn)入"格式化編輯器"對(duì)話框。
3. 選擇"超級(jí)鏈接"選項(xiàng)卡,并設(shè)置超級(jí)鏈接類型為"Internet 上的網(wǎng)址"。
4. 單擊超級(jí)鏈接信息的網(wǎng)站地址后面的公式的鈕,輸入公式 {?URL} + "name"。
5. 這樣表頭就變成了超級(jí)鏈接,而且指向 http://www.nt.cn/cr.aspx?sort_field=name。
6. ASP.NET 程序在 Page_Load 事件里讀取要排序的字段 sort_field,然后對(duì)水晶報(bào)表進(jìn)行排序。
7. 水晶報(bào)表排序編程實(shí)例
Dim crReportDocument As ReportDocument
Public Sub changeSortField(mySortFld As String, mySortDir As String)
Dim crSortField As SortField Dim crSortDirection As SortDirection Dim crDatabaseFieldDefinition As DatabaseFieldDefinition
For Each crSortField In crReportDocument.DataDefinition.SortFields If crSortField.Field.Name.ToString = mySortFld Then crDatabaseFieldDefinition = crReportDocument.Database.Tables(0).Fields(mySortFld.ToString) crSortField = crReportDocument.DataDefinition.SortFields(0) crSortField.Field = crDatabaseFieldDefinition
If mySortDir = "Ascending" Then crSortField.SortDirection = SortDirection.AscendingOrder Else crSortField.SortDirection = SortDirection.DescendingOrder End If End If Next
CrystalReportViewer1.ReportSource = crReportDocument End Sub
|
溫馨提示:喜歡本站的話,請(qǐng)收藏一下本站!