下面方法可以实现正排序或倒排序
Private Sub DataGrid2_SortCommand1(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridSortCommandEventArgs) Handles DataGrid2.SortCommand
If Session("sort") = "0" Or IsNothing(Session("sort")) Then
databind(e.SortExpression)
Session("sort") = "1"
Else
databind(e.SortExpression & " DESC")
Session("sort") = "0"
End If
End Sub
Private Sub show_receive(ByVal source As String)
Dim ds As New DataSet
Dim dataview1 As DataView
DAinformation = New SqlDataAdapter(Select_Information, myconnect)
DAinformation.Fill(ds, "receive")