Paging a Table

Question

Could someone help me with the code to maintain the data when paging the table. I populated the table based on the role that the user selected in a drop down. Here is my existing code.
Protected Sub ddkRolesList_Select(ByVal sender As System.Object, ByVal e As SAP.Web.UI.Controls.AbstractDropDownByKey.SelectEventArgs) Handles ddkRolesList.Select
Dim um As New UserManagement
Dim role As String = ddkRolesList.SelectedKey.ToString()
Dim users As Array = um.GetUsersOfRole(role, True)
Dim user As String
For Each user In users
Dim tRow As New TableRow()
Dim tCell As New TableBodyCell()
Dim tCell2 As New TableBodyCell()
Dim tCell3 As New TableBodyCell()
tCell.TableCellContent = New TextView(GetName(user))
tRow.Cells.Add(tCell)
tCell2.TableCellContent = New TextView(GetEmail(user))
tRow.Cells.Add(tCell2)
tCell3.TableCellContent = New CheckBox()
tRow.Cells.Add(tCell3)
Table1.Items.Add(tRow)
Next
End Sub
Thanks,
Gabe Petro

Answer 1

Hi Gabe,
how are you doing ?
have you informed yourself of the links presented by Ofer in the following thread : Portal User Management via .Net   ?
that is the methodology to be able to access the UM from within NPDK
comming to the code :
the logical steps in your case
1> read portal object
2> create local copy of data object
3> create local data table
4> create default view and bind grid
they are over engineered, but none the less should yeild the result you require
what result do you get with the code ?
um.GetUsersOfRole(role, True)
please check the methods
1> GetUserName
2> GetUserEmail
as they are outside the scope of the current function
with respect,
amit
Private Sub BuildTable(ByVal roleID As String)
Dim um As New UserManagement()
Dim role As String = roleID
Dim users As Array = um.GetUsersOfRole(role, True)
Dim user As String
tblRoleA.Header.Text = "Users of " & ddkRoleA.SelectedItem.Text
Dim usersTable As New DataTable
Dim myDataRow As DataRow
Dim myDataView As DataView
usersTable.Columns.Add("Name", Type.GetType("System.String"))
usersTable.Columns.Add("Email", Type.GetType("System.String"))
' Iterate FileInfo objects to populate the DataTable.
For Each user In users
myDataRow = usersTable.NewRow()
myDataRow("Name") = GetUserName(user)
myDataRow("Email") = GetUserEmail(user)
usersTable.Rows.Add(myDataRow)
Next user
' Create a new DataView and sort it based on the sort field.
myDataView = usersTable.DefaultView
'myDataView.Sort = strSortField
tblRoleA.DataSource = myDataView
tblRoleA.DataBind()
End Sub