设计思路：
为了方便起见，我们连接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页代码：
<form id="form1" method="post" runat="server">
<asp:datagrid id="dgorder" runat="server" height="515px" width="718px" autogeneratecolumns="false" allowsorting="true" cellpadding="4" borderwidth="1px" bordercolor="#a0abeb" pagesize="15" borderstyle="solid" backcolor="white" gridlines="vertical" forecolor="black" allowpaging="true" showfooter="true">
<selecteditemstyle forecolor="white" backcolor="black"></selecteditemstyle>
<alternatingitemstyle backcolor="#eeeeee"></alternatingitemstyle>
<headerstyle horizontalalign="center" forecolor="white" bordercolor="#6876c5" backcolor="#6876c5"></headerstyle>
<footerstyle forecolor="white" backcolor="#6876c5"></footerstyle>
<columns>
<asp:templatecolumn>
<itemtemplate>
<font face="">
<asp:checkbox id="cb" runat="server"></asp:checkbox></font>
</itemtemplate>
</asp:templatecolumn>
<asp:boundcolumn datafield="orderid" sortexpression="orderid" headertext="id">
<headerstyle width="180px"></headerstyle>
</asp:boundcolumn>
<asp:boundcolumn datafield="shipcountry" sortexpression="shipcountry" headertext="shipcountry">
<headerstyle width="180px"></headerstyle>
</asp:boundcolumn>
<asp:boundcolumn datafield="shippeddate" sortexpression="shippeddate" headertext="shippeddate" dataformatstring="{0:d}">
<headerstyle width="180px"></headerstyle>
</asp:boundcolumn>
<asp:boundcolumn datafield="freight" sortexpression="freight" headertext="freight">
<headerstyle width="180px"></headerstyle>
</asp:boundcolumn>
<asp:boundcolumn datafield="shipaddress" sortexpression="shipaddress" headertext="shipaddress">
<headerstyle width="480px"></headerstyle>
</asp:boundcolumn>
</columns>
<pagerstyle horizontalalign="center" forecolor="black" position="topandbottom" backcolor="white" mode="numericpages"></pagerstyle>
</asp:datagrid>
</form>
后台代码：
得到数据视图，参数为要排序的列
private function getdv(byval strsort as string) as dataview
定义数据库连接
dim dv as dataview
dim 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).defaultview
catch ex as exception
#if debug then
session("error") = ex.tostring()
response.redirect("../error.aspx") 跳转程序的公共错误处理页面
#end if
finally
关闭连接
cn.close()
end try
排序
dv.sort = strsort
return dv
end function
private sub page_load(byval sender as system.object, byval e as system.eventargs)
handles mybase.load
if not ispostback then
viewstate("strsort") = "orderid"
dgorder.datasource = getdv(viewstate("strsort").tostring())
dgorder.databind()
end if
end sub
排序
private sub dgorder_sortcommand(byval source as object,
byval e as system.web.ui.webcontrols.datagridsortcommandeventargs) handles dgorder.sortcommand
dgorder.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.newpageindex
dgorder.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.click
dim item as datagriditem
dim strscript as string
strscript = "<script language=javascript>alert("
循环表格的项，findcontrol
for each item in me.dgorder.items
if ctype(item.findcontrol("cb"), system.web.ui.webcontrols.checkbox).checked then
try
strscript += item.cells(1).text & space(2)
catch ex as exception
end try
end if
next
strscript += "被选择！)</script>"
registerclientscriptblock("系统消息", strscript)
end sub
上面的代码registerclientscriptblock添加java script脚本弹出对话框。（其实vb script的对话框比java script的对话框多更多的显示和控制方式，但netscape的浏览器不支持，大家可根据相应的项目在程序里选择用哪种脚本）。
总结：
datagrid是我们常用的web 控件，有时我们还可以和datalist混合使用，通过修改html页，可以达到好的页面效果。上面只是一个例子，为了便于清楚整个过程，我把数据访问部分(sql)写到了页面中。在软件开发中，我们一般把访问数据的部分写成数据层，页面调用数据层得到数据，这样逻辑清晰，修改和维护都很方便。
文章整理：西部数码--专业提供域名注册、虚拟主机服务
http://www.west263.com
以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢!
