代码如下:
<%@ page language="vb" debug="true"%>
<%@ import namespace="system.data"%>
<%@ import namespace="system.data.oledb"%>
<script runat="server">
sub page_load(obj as object,e as eventargs)
'set up connection
dim myConnection as new oledbConnection("provider=microsoft.jet.oledb.4.0;data source=E:\aspdotnet\9\db9.mdb")
'open connection
dim mycommand as new oledbDataAdapter("select * from aspnet",myconnection)
'fill dataset
dim ds as new dataSet()
mycommand.fill(ds,"aspnet")
'select data view and bind to server control
DAtaGrid1.DataSource=ds.Tables("aspnet").DefaultView
DataBind()
end sub
'排序
sub DataGrid1_SortCommand(obj as object,e as DataGridSortCommandEventargs)

DataGrid1.Databind()
end sub
'分页
sub DataGrid1_pageIndexChanged(obj as object,e as DataGridPageChangedEventargs)
DataGrid1.CurrentPageIndex=e.NewPageIndex
DataGrid1.DataBind()
end sub
</script><html><body>
<form runat="server">
<asp:DataGrid id="DataGrid1" runat="server" BorderColor="#000000" GridLines="Vertical" CellPadding="4" CellSpacing="4" Font-Name="arial" Width="450" Font-Size="8pt" ShowFooter="true" HeaderStyle-BackColor="#cccc99" FooterStyle-BackColor="#cccc99" ItemStyle-BackColor="#ffffff" AlternatingItemStyle-BackColor="#cccccc" AutoGenerateColumns="true"
onEditCommand="DataGrid1_edit" OnCancelCommand="DataGrid1_cancel" OnUpdateCommand="DataGrid1_Update"  OnSortCommand=" DataGrid1_SortCommand" AllowSorting="true"
 AllowPaging="true" PageSize="3" PagerStyle-Mode="NumericPages" PagerStyle-PageButtonCount="9999" OnPageIndexChanged="DataGrid1_PageIndexChanged">  </asp:DataGrid>
</form>
</body></html>

解决方案 »

  1.   

    你的排序事件里面什么也没写啊!
    他会传一个排序字段近来,根据这个字段,重新构造你的sql语句就可以了,或者使用dataview的sort方法
      

  2.   

    qqdao:
        你好,我是.net初学者,能不能麻烦你帮忙把代码写出来呢?谢谢!
      

  3.   

    sub DataGrid1_SortCommand(obj as object,e as DataGridSortCommandEventargs)
    obj.DefaultView.sort=e.sortexpression.Tostring()
    DataGrid1.Databind()
    end sub
      

  4.   

    运行了,但是出错
    显示的是:
    异常详细信息:  System.MissingMemberException: 未找到类型“DataGrid”的公共成员“DefaultView”。
    该怎么办啊????谢谢了
      

  5.   

    sub DataGrid1_SortCommand(obj as object,e as DataGridSortCommandEventargs)
    ds.Tables("aspnet").DefaultView.sort=e.sortexpression.Tostring()
    DataGrid1.Databind()
    end sub
      

  6.   

    <%@ page language="vb" debug="true"%>
    <%@ import namespace="system.data"%>
    <%@ import namespace="system.data.oledb"%>
    <script runat="server">
    sub page_load(obj as object,e as eventargs)
    'set up connection
    dim myConnection as new oledbConnection("provider=microsoft.jet.oledb.4.0;data source=E:\aspdotnet\9\db9.mdb")
    'open connection
    dim mycommand as new oledbDataAdapter("select * from aspnet",myconnection)
    'fill dataset
    dim ds as new dataSet()
    mycommand.fill(ds,"aspnet")
    'select data view and bind to server control
    DAtaGrid1.DataSource=ds.Tables("aspnet").DefaultView
    DataBind()
    end sub
    '编辑命令
    sub DataGrid1_edit(obj as object,e as DataGridCommandEventargs)
    DataGrid1.EditItemIndex=e.Item.ItemIndex
    DataGrid1.Databind()
    end sub
    '更新
    sub DataGrid1_Update(obj as object,e as DataGridCommandEventargs)
    'do update
    DataGrid1.Databind()
    end sub
    '删除命令
    sub DataGrid1_Cancel(obj as object,e as DataGridCommandeventargs)
    DataGrid1.EditItemIndex=-1
    DataGrid1.Databind()
    end sub
    '排序功能
    sub DataGrid1_SortCommand(obj as object,e as DataGridSortCommandEventargs)
    'sort the data using the sortField property of the evetargs
    DAtaGrid1.DataSource.sort=e.sortexpression.Tostring()
    DataGrid1.Databind()
    end sub
    '分页
    sub DataGrid1_pageIndexChanged(obj as object,e as DataGridPageChangedEventargs)
    DataGrid1.CurrentPageIndex=e.NewPageIndex
    DataGrid1.DataBind()
    end sub
    </script><html><body>
    <form runat="server">
    <asp:DataGrid id="DataGrid1" runat="server" BorderColor="#000000" GridLines="Vertical" CellPadding="4" CellSpacing="4" Font-Name="arial" Width="450" Font-Size="8pt" ShowFooter="true" HeaderStyle-BackColor="#cccc99" FooterStyle-BackColor="#cccc99" ItemStyle-BackColor="#ffffff" AlternatingItemStyle-BackColor="#cccccc" AutoGenerateColumns="true"
    onEditCommand="DataGrid1_edit" OnCancelCommand="DataGrid1_cancel" OnUpdateCommand="DataGrid1_Update"  OnSortCommand=" DataGrid1_SortCommand" AllowSorting="true" 
     AllowPaging="true" PageSize="3" PagerStyle-Mode="NumericPages" PagerStyle-PageButtonCount="9999" OnPageIndexChanged="DataGrid1_PageIndexChanged">
      <columns>

    <asp:EditCommandColumn EditText="edit" CancelText="Cancel" UpdateText="Update" ItemStyle-Wrap="false" HeaderText="编辑"/>
    <asp:buttoncolumn HeaderText="delete?" Text="删除" CommandName="delete" ButtonType="PushButton"/>
    </columns>
     </asp:DataGrid>
    </form>
    </body></html>
    我搞定了,谢谢各位!!!!