.NET开发

本类阅读TOP10

·NHibernate快速指南(翻译)
·vs.net 2005中文版下载地址收藏
·【小技巧】一个判断session是否过期的小技巧
·VB/ASP 调用 SQL Server 的存储过程
·?dos下编译.net程序找不到csc.exe文件
·通过Web Services上传和下载文件
·学习笔记(补)《.NET框架程序设计(修订版)》--目录
·VB.NET实现DirectDraw9 (2) 动画
·VB.NET实现DirectDraw9 (1) 托管的DDraw
·建站框架规范书之——文件命名

分类导航
VC语言Delphi
VB语言ASP
PerlJava
Script数据库
其他语言游戏开发
文件格式网站制作
软件工程.NET开发
在DataGrid中为Footer添加自定义内容

作者:未知 来源:月光软件站 加入时间:2005-2-28 月光软件站

在DataGrid中为Footer添加自定义内容
作者:孟宪会 出自:【孟宪会之精彩世界】 发布日期:2003年5月2日 1点1分26秒

首先:创建为Page_Load事件编写数据绑定的代码:

<%@ Page Language="VB" %> <%@ Import Namespace="System.Data" %> <%@ Import Namespace="System.Data.SqlClient" %> <p> <script runat="server"> Sub Page_Load(Sender As Object, E As EventArgs) Dim myConnectionString As String = "Data Source=.;Initial Catalog=NorthWind;User Id=sa;Password=;" Dim myConnection As SqlConnection = new SqlConnection(myConnectionString) Dim myCommand As SqlCommand = New SqlCommand("select * from Categories", myConnection) Dim myDataReader As SqlDataReader Try myConnection.Open() myDataReader = myCommand.ExecuteReader(CommandBehavior.CloseConnection) myDataGrid.DataSource = myDataReader myDataGrid.DataBind() Catch myException As Exception Response.Write("数据错误:" & myException.ToString()) Finally If Not myDataReader Is Nothing Then myDataReader.Close() End If End Try End Sub

其次:创建OnItemDataBound事件,在OnItemDataBound事件中,我们可以对DataGrid中每行进行数据绑定时进行检测。这里我们只添加Footer部分的内容,因此,我们只检测DataGrid中的Footer部分。下面是 DataGrid中几种ItemTypes类型。

Item Type Description
Header DataGrid控件的Heading部分
Footer DataGrid控件的Footer部分
Item DataGrid控件中每个条目
AlternatingItem DataGrid控件的alternating条目
SelectedItem DataGrid控件的selected条目
EditItem DataGrid控件的可编辑条目
Separator DataGrid控件每个条目之间的分割部分
Pager DataGrid控件的page selection部分

最后:一旦我们检测到当前是Footer部分,就可以添加我们的动态内容。这里我在第二列添加一个链接。

Public Sub myDataGrid_ItemDataBound(sender As Object, e As DataGridItemEventArgs) '只有类型为footer的时候进行执行 If(e.Item.ItemType = ListItemType.Footer ) Dim myHyperLink As HyperLink = new HyperLink() If Not Request.QueryString("id") = Nothing Then myHyperLink.Text = "添加内容" myHyperLink.NavigateURL = "adddetail.aspx?id=" & Request.QueryString("id") Else myHyperLink.Text = "没有添加内容" End If 'Cells从0开始 e.Item.Cells(1).Controls.Add(myHyperLink) End If End Sub </script> 下面是aspx页面部分: <html> <head> </head> <body> <form runat="server"> <asp:datagrid id="myDataGrid" runat="server" showfooter="true" onitemdatabound="myDataGrid_ItemDataBound" enableviewstate="false"> </asp:datagrid> </form> </body> </html>



相关文章

相关软件