Dim ds As New DSUserPages Dim ta As New DSUserPagesTableAdapters.UserPageURLsTableAdapter Dim dt As New DSUserPages.UserPageURLsDataTable ta.Fill(dt, Session("UID"), CType("9999/12/31", DateTime)) ds.Tables.Add(dt) Repeater1.DataSource = dt Repeater1.DataBind() Dim dt2 As New DSUserPages.UserPageLinkListDataTable Dim ta2 As New DSUserPagesTableAdapters.UserPageLinkListTableAdapter ta2.Fill(dt2, Session("UID")) ds.Tables.Add(dt2)