При удалении строк Repeater не обновляется

Imports System.Data
Imports System.Data.OleDb
Imports System.IO
Public MustInherit Class LeftMenuModule1
    Inherits System.Web.UI.UserControl
    Protected WithEvents DataList As System.Web.UI.WebControls.Repeater
    Protected WithEvents NewCategory As System.Web.UI.WebControls.Button
    Protected WithEvents NewArticle As System.Web.UI.WebControls.Button
 
#Region ' Web Form Designer Generated Code '
 
    'This   Count > 0 Then
            NewArticle.Visible = True
        Else
            NewArticle.Visible = False
        End If
 
        myAdp.Close()
        myAdp = Nothing
        myCon.Close()
        myCon = Nothing
    End Sub
 
    Sub NewCategory_onClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewCategory.Click
        Response.Redirect('?LC=EC')
    End Sub
 
    Sub NewArticle_onClick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NewArticle.Click
        Response.Redirect('?LC=EA')
    End Sub
End Class

Imports System.Data
Imports System.Data.OleDb
Imports System.IO
 
Public MustInherit Class ViewArticles
    Inherits System.Web.UI.UserControl
    Protected WithEvents DataList As System.Web.UI.WebControls.Repeater
 
#Region ' Web Form Designer Generated Code '
 
    'This call is required by the Web Form Designer.
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
 
    End Sub
 
    Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
        'CODEGEN: This method call is required by the Web Form Designer
        'Do not modify it using the code editor.
        InitializeComponent()
    End Sub
 
#End Region
    Public CategoryID As Integer
 
    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Not IsPostBack Then
            Dim myConn As OleDbConnection
            Dim myComm As OleDbCommand
            Dim myAdp As OleDbDataReader
            Dim myComm1 As OleDbCommand
            Dim myAdp1 As OleDbDataReader
            myConn = New OleDbConnection(Application('strConn'))
            myConn.Open()
 
            myComm = New OleDbCommand('SELECT * FROM Articles WHERE CategoryID=' & CategoryID & ' ORDER BY ArticlePriority ', myConn)
            myAdp = myComm.ExecuteReader
            DataList.DataSource = myAdp
            DataList.DataBind()
            myAdp.Close()
            myAdp = Nothing
            myConn.Close()
            myConn = Nothing
        End If
    End Sub
 
 
End Class