请教，修改加分页问题，十万火急啊

各位兄台，我开始碰到的问题是不能翻页，后来去掉 Page_Load 方法里面的第一个 if 语句后就可以翻页了，可是这样改了就不能修改了，不能修改是指取得的值不是新输入的，而是老的值，诚请兄台们不吝赐教！！代码如下Private Sub Page_Load(......) Handles MyBase.Load
    If Not (IsPostBack) Then
        If Not (Context.User.Identity.IsAuthenticated ) Then
            Label1.Text = "你无权访问此页面！"
            Label1.Visible = True
        Else
            BindGrid()                    
        End If
    End If
End Sub'修改
Sub MyDataGrid_Edit(ByVal Sender As Object, ByVal E As DataGridCommandEventArgs)
    DataGrid1.EditItemIndex = CInt(E.Item.ItemIndex)
    BindGrid()
End Sub'取消
Sub MyDataGrid_Cancel(ByVal Sender As Object, ByVal E As DataGridCommandEventArgs)
    DataGrid1.EditItemIndex = -1
    BindGrid()
End Sub'保存
Sub MyDataGrid_Update(ByVal Sender As Object, ByVal E As DataGridCommandEventArgs)
    .
    .
    .
    Dim CurrentDropList As DropDownList
    Dim CurrentTextBox1, CurrentTextBox2 As TextBox
    Dim startdt, enddt, rolesv, statev As String
    Dim uid As String = DataGrid1.DataKeys(CInt(E.Item.ItemIndex))    CurrentTextBox1 = E.Item.FindControl("edit_startdate")
    CurrentTextBox2 = E.Item.FindControl("edit_enddate")
    startdt = CurrentTextBox1.Text
    enddt = CurrentTextBox2.Text
    CurrentDropList = E.Item.FindControl("edit_roles")
    rolesv = CurrentDropList.SelectedValue
    CurrentDropList = E.Item.FindControl("edit_state")
    statev = CurrentDropList.SelectedValue    Dim updateid As Integer
    updateid = dataUser.Open_Service(uid, startdt, enddt, rolesv, statev)
    If updateid = 1 Then
        Label1.Text = "修改成功！"
        Label1.Visible = True
    Else
        Label1.Text = "修改失败！"
        Label1.Visible = True
    End IfEnd SubSub BindGrid()
    Dim myUserList As New DataSet
    Dim myUserObject As New User    Try
        myUserList = myUserObject.RetrieveAll("1")
        If myUserList Is Nothing Then
            Label1.Text = "还没有个人会员信息！"
        Else
            myUserList.Tables(0).Columns(0).ColumnName() = "UserID"
            myUserList.Tables(0).Columns(1).ColumnName() = "Loginid"
            .
            .
            .            DataGrid1.DataSource = myUserList.Tables(0)
            DataGrid1.Columns(0).Visible = False
            DataGrid1.DataBind()                    
            Label1.Text = "共有 " + CStr(myUserList.Tables(0).Rows.Count) + " 位会员！"                    
        End If
    Catch ex As Exception
        AppException.LogError(ex.Message.ToString)'输出到错误日志文件
    End Try
End Sub
Private Sub DataGrid1_PageIndexChanged(.... ) Handles DataGrid1.PageIndexChanged
    DataGrid1.CurrentPageIndex() = e.NewPageIndex()
    DataGrid1.DataBind()
End Sub