Private sub DTGUSERS_PAGEINDEXCHANGED (BYVAL SOURCE AS Object, BYVAL E AS System.Web.ui.WebControls.DataGridPageChangeDeventargs) Handles DTGUSERS.PAGEIDEXCHANGED
DataGridbind (E.NEWPAGEINDEX)
End Sub
'Refresh the DataGrid's Data
Private sub DataGridbind (optional byval pageIndex as int32 = 0)
'DataGrid DataBind ()
Me.dtgusers.currentPageIndex = PageIndex
ViewState.Add ("PageIndex", PageIndex)
Me.dtgusers.DataSource = [DataTablename] me.dtgusers.database ()
'Is DataGrid Null
IF dtgusers.Items.count = 0 THEN
Alertscript.showalert (ME, ", Alertscript.Message.Nodata)
END IF
End Sub
