Delete Record ได้ไม่หมดค่ะ (VB + Repeater Control)

<asp:Repeater ID="rp_mailList" runat="server" EnableTheming="True">
                    <HeaderTemplate>
                        <table style="background-color: #FFECEC; font-family: Arial, Helvetica, sans-serif; font-size: small; border: thin dashed #FF6699;">
                            <tr style="background-color: #FFFFFF; color: #CC6699; text-align:center;">
                                <th style="width: 30px">
                                    </th>
                                <th style="width:50px;">
                                    </th>
                                <th align="left" style="width: 150px">
                                    From</th>
                                <th align="left" style="width: 250px">
                                    Subject</th>
                                <th align="left" style="width: 150px">
                                    Date</th>
                                <th style="width: 50px">
                                    Delete</th>
                            </tr>
                    </HeaderTemplate>
                    <ItemTemplate>
                        <tr style="font-weight: normal; color: #808080">
                            <td align="center">
                                <asp:Image ID="img_seen" runat="server" />
                            </td>
                            <td align="center">
                                <asp:Label ID="lbl_mailID" runat="server"></asp:Label>
                            </td>
                           <td align="left">
                                <asp:Label ID="lbl_name" runat="server">lbl_name</asp:Label>
                            </td>
                            <td style="text-align:left;">
                                <asp:HyperLink ID="bt_subject" runat="server">bt_subject</asp:HyperLink>
                            </td>
                           <td style="text-align:left;">
                                <asp:Label ID="lbl_date" runat="server">lbl_date</asp:Label>
                            </td>
                            <td align="center">
                                <asp:ImageButton ID="bt_delete" runat="server" />
                            </td>
                        </tr>
                    </ItemTemplate>
                    <AlternatingItemTemplate>
                    <tr style="font-weight: normal; color: #808080; background-color: #FFCACA;">
                            <td align="center">
                                <asp:Image ID="img_seen" runat="server" />
                            </td>
                            <td align="center">
                                <asp:Label ID="lbl_mailID" runat="server"></asp:Label>
                            </td>
                           <td align="left">
                                <asp:Label ID="lbl_name" runat="server">lbl_name</asp:Label>
                            </td>
                            <td style="text-align:left;">
                                <asp:HyperLink ID="bt_subject" runat="server">bt_subject</asp:HyperLink>
                            </td>
                           <td style="text-align:left;">
                                <asp:Label ID="lbl_date" runat="server">lbl_date</asp:Label>
                            </td>
                            <td align="center">
                                <asp:ImageButton ID="bt_delete" runat="server" CommandName="Delete" />
                            </td>
                        </tr>
                    </AlternatingItemTemplate>
                    
                </asp:Repeater>

Protected Sub rp_mailList_ItemCommand(ByVal source As Object, ...
If e.CommandName = "Delete" Then
            '*** mailID ***'
            Dim lbl_mailID As Label = CType(e.Item.FindControl("lbl_mailID"), Label)

            If (objConn.State = ConnectionState.Open) Then
                objConn.Close()
            End If
            objConn.Open()

            '*** Transaction Start ***'
            Trans = objConn.BeginTransaction(IsolationLevel.ReadCommitted)

            '*** Command ***'
            With objCmd
                .Connection = objConn
                .Transaction = Trans
            End With

            Try
                '*** Query ***'
                strSQL = "DELETE FROM tb_mail " & _
                " WHERE mail_id = '" & lbl_mailID.Text & "';"
                objCmd.CommandText = strSQL
                objCmd.CommandType = CommandType.Text
                objCmd.ExecuteNonQuery()
                '*** End Query ***'

                '*** Commit Transaction ***'
                Trans.Commit()
                BindData()
            Catch ex As Exception
                '*** RollBack Transaction ***'
                Trans.Rollback()
                lbl_Alert.Visible = True
                lbl_Alert.Text = "Record can not delete Error (" & ex.Message & ")"
            End Try
            objConn.Close()
        End If