paging problem in editable datagrid

[Shail]

Hello every one

I am using editable datagrid in my application. I set grid's allowpaging property to true. My application is not working properly. When I click on 'Edit' to modify any row, instead of making the row editable for user, PageIndexChanged event is fired and grid's current page is changed. When I click on next/previous page my current page is not chaning. Can any body help me what to do. My complete code is as under

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Loa
'Put user code to initialize the page her
loadgrid(
If Not Page.IsPostBack The
dgdata.CurrentPageIndex =
End I
End Su

Sub loadgrid() 'this sub is to create the grid at runtime
Dim com As New SqlCommand(
Dim da As New SqlDataAdapter("select * from tblissue", mycon
Dim ds As New DataSet(
Dim dc As New BoundColumn(
Dim ea As New EditCommandColumn(
Dim i As Int3

da.Fill(ds, "tblissue"

dgdata.AutoGenerateColumns = Fals
dgdata.AllowPaging = Tru
dgdata.PagerStyle.Mode = PagerMode.NextPre

dgdata.PageSize =

dgdata.DataSource = ds.Tables("tblissue"
ea.ButtonType = ButtonColumnType.LinkButto
ea.EditText = "edit
ea.UpdateText = "update
ea.CancelText = "cancel

dgdata.Columns.Add(ea
For i = 0 To ds.Tables("tblissue").Columns.Count -
dc.DataField = ds.Tables("tblissue").Columns(i).ColumnNam
dc.HeaderText = ds.Tables("tblissue").Columns(i).Captio
dgdata.Columns.Add(dc
If (ds.Tables("tblissue").Columns(i).ColumnName = "solved") Or (ds.Tables("tblissue").Columns(i).ColumnName = "expecteddate") Or (ds.Tables("tblissue").Columns(i).ColumnName = "expectedtime") The
dc.Visible = False 'to hide date/time colum
End I
If ds.Tables("tblissue").Columns(i).ColumnName = "issueid" Then dc.ReadOnly = True ' to lock ID colum
dc = New BoundColumn(
Nex
dgdata.DataBind(
End Su

'following sub is called in pageindexchanged event fire
Sub newpage(ByVal sender As Object, ByVal objArgs As DataGridPageChangedEventArgs
dgdata.EditItemIndex = -1
dgdata.CurrentPageIndex = objArgs.NewPageInde
End Su

Sub editdg_EditCommand(ByVal source As Object, ByVal e As DataGridCommandEventArgs
dgdata.EditItemIndex = e.Item.ItemInde
dgdata.DataBind(
End Su

Sub canceldg_CancelCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs ) Handles dgdata.CancelComman
dgdata.EditItemIndex = -
dgdata.DataBind(
End Su

Plz guide m
Shail.