It is the same page and below is the code
The user clickes the Column header and the data disappears
Thanks
Protected Sub dg_Sorting(ByVal sender As Object, ByVal e As
System.Web.UI.WebControls.GridViewSortEventArgs) Handles dg.Sorting
Dim sSort As String
Dim sDirection As String
sSort = ViewState("Sort")
sDirection = ViewState("Direction")
If sSort = e.SortExpression Then
If sDirection = "asc" Then
sDirection = "desc"
Else
sDirection = "asc"
End If
Else
sDirection = "asc"
End If
ViewState("Sort") = sSort
ViewState("Direction") = sDirection
PopulateList(e.SortExpression & " " & sDirection)
End Sub