让Asp.NET的DataGrid可排序、可选择、可分页.doc

让asp.net的datagrid可排序、可选择、可分页 网人帝国 添加时间：2003-11-25 12:54:45 人气：71 datagrid是asp.net中的一个重要的控件，经常我们都将datagrid做成可分页的和可排序的，有时还需要加上选择功能。这些都是经常需要用到的方法，其实是比较简单的。设计思路：为了方便起见，我们连接sql server 2000的northwind数据库的orders表，从数据库里得到此表的数据视图。利用datagrid的sortcommand事件实现排序。用一个模板列加上checkbox控件实现选择。可用datagrid的属性生成器的“分页”选项或者自己修改html实现分页。html：添加一个datagrid，命名为dgorder。添加了一个模板列，模板列里放一个名为cb的checkbox控件。此列用来实现选择为要排序的每个列加上排序表达式sortexpression。利用列的dataformatstring来格式化列，象dataformatstring=0:d显示日期格式。设置pagesize=15每页显示15行数据，allowpaging=true 为允许分页 。整个html页代码：后台类添加以下代码：imports system.data.sqlclient得到数据视图，参数为要排序的列private function getdv(byval strsort as string) as dataview定义数据库连接dim dv as dataviewdim cn as new sqlconnection()try初始化连接字符串cn.connectionstring = data source=pmserver;initial catalog=northwind;persist security info=false;user id=sa;password=sa;cn.open()从northwind得到orders表的数据dim adp as sqldataadapter = new sqldataadapter(select * from orders, cn)dim ds as new dataset()adp.fill(ds)得到数据视图dv = ds.tables(0).defaultviewcatch ex as exception#if debug thensession(error) = ex.tostring()response.redirect(./error.aspx) 跳转程序的公共错误处理页面#end iffinally关闭连接cn.close()end try排序dv.sort = strsortreturn dvend functionprivate sub page_load(byval sender as system.object, byval e as system.eventargs) handles mybase.loadif not ispostback thenviewstate(strsort) = orderiddgorder.datasource = getdv(viewstate(strsort).tostring()dgorder.databind()end ifend sub排序private sub dgorder_sortcommand(byval source as object, byval e as system.web.ui.webcontrols.datagridsortcommandeventargs) handles dgorder.sortcommanddgorder.currentpageindex = 0得到排序的列viewstate(strsort) = e.sortexpression.tostring()dgorder.datasource = getdv(viewstate(strsort).tostring()dgorder.databind()end sub分页private sub dgorder_pageindexchanged(byval source as object, byval e as system.web.ui.webcontrols.datagridpagechangedeventargs) handles dgorder.pageindexchanged得到分页的页号dgorder.currentpageindex = e.newpageindexdgorder.datasource = getdv(viewstate(strsort).tostring()dgorder.databind()end sub 运行结果如下图所示：(点击列标头可以排序)为了知道用户选择的是哪些记录，我们可以利用datagriditem的findcontrol得到checkbox的值，我们来添加一个按钮，再写如下代码：private sub button1_click(byval sender as system.object, byval e as system.eventargs) handles button1.clickdim item as datagriditemdim strscript as stringstrscript = alert(循环表格的项，findcontrolfor each item in me.dgorder.itemsif ctype(item.findcontrol(cb), system.web.ui.webcontrols.checkbox).checked thentrystrscript += item.cells(1).text & space(2)catch ex as exceptionend tryend ifnextstrscript += 被选择！)registerclientscriptblock(系统消息, strscript)end sub 上面的代码registerclientscriptblock添加java script脚本弹出对话框。（其实vb script的对话框比java script的对话框多更多的显示和控制方式，但netscape的浏览器不支持，大家可根据相应的项目在程序里选择用哪种脚本）。总结：datagrid是我们常用的