Dim dtable As Data.DataTable = StoredProcedure.Tables(0)Dim dview As New Data.DataView(dtable)If ViewState("SortOrder").ToString() = " ASC" Thendview.Sort = e.SortExpression.ToString & " ASC"ViewState("SortOrder") = " DESC"ElseIf ViewState("SortOrder").ToString() = " DESC" Thendview.Sort = e.SortExpression.ToString & " DESC"ViewState("SortOrder") = " ASC"End IfGridView1.DataSource = dviewGridview1.DataBind()