要支持排序功能，只要将datagrid web 控件的allowsorting 属性设为true，并且指定要排序时所要执行的程序为何即可。下列范例支持排序的功能，使用者可以点选欲排序的字段，该字段数据即以升幂方式排列；若再点选该字段一次，则该字段改成以降序的方式排列：
<%@import namespace=system.data.ado%>
<%@import namespace=system.data%>
<!--#include file="gettable.inc"-->
<html>
<form runat="server">
<asp:datagrid id="dga" allowpaging="true" pagesize="10"
onpageindexchanged="dga_pagechg" runat="server"
pagerstyle-mode="numericpages" bordercolor="#808080"
headerstyle-font-names="courier new"
headerstyle-backcolor="#d1dceb"
headerstyle-horizontalalign="center"
allowsorting="true" onsortcommand="dga_sort">
</asp:datagrid>
<asp:textbox id="txthidden" runat="server" visible="false"
enabled="false"/>
</form>
<script language="vb" runat="server">
dim dtdatatable as datatable=gettable("ch08\myweb.mdb", "members")
sub page_load(sender as object, e as eventargs)
if page.ispostback=false then
txthidden.text="username"
dga.datasource=dtdatatable.defaultview
page.databind()
end if
end sub
sub dga_pagechg(sender as object, e as datagridpagechangedeventargs)
if txthidden.enabled=true then
dtdatatable.defaultview.sort=txthidden.text
else
dtdatatable.defaultview.sort=txthidden.text & " desc"
end if
dga.datasource=dtdatatable.defaultview
page.databind()
end sub
sub dga_sort(sender as object, e as datagridsortcommandeventargs)
if txthidden.enabled=false then
dtdatatable.defaultview.sort=e.sortfield
else
dtdatatable.defaultview.sort=e.sortfield & " desc"
end if
txthidden.enabled=not txthidden.enabled
txthidden.text=e.sortfield
dga.datasource=dtdatatable.defaultview
page.databind()
end sub
</script>
</html>
由于datagrid web 控件并不会自动排序数据，所以我们藉由onsortcommand 事件程序来修
改datatable.defaultview 的sort 属性。由于换页的时候原来的排序状况无法保留，所以我们
透过一个textbox web 控件，并将其visible 属性设为false 来帮我们保持排序的状况。其中
textbox 的text 属性用来记录所要排序的字段名称，而enabled 属性用来表示排序的方式是升
幂还是降序。其执行结果如图所示：
第一次点选时以升幂方式排序
第二次点选时以降序方式排序
