Unnamed

<%@ Control Language="VB" %>
<script runat="server">

    Public NewsID as String
    Public Property GetNewsID() AS String
     GET
        Return NewsID
    End GET

    SET (ByVal Value As String)
        NewsID = Value
    End SET



    Sub Page_Load(sender as object, E as EventArgs)
         Dim AccLvl as Integer
         AccLvl = Session("AccessLvl")
         If AccLvl = 2 then
            ImgAdd.Visible = True
         Elseif AccLvl = 3 then
            ImgAdd.Visible = true
            ImgEdit.visible = true
            ImgDelete.visible = true
         End if
    End Sub

    Sub ImgAdd_Click(sender As Object, e As ImageClickEventArgs)
    Response.Redirect("/submitnews.aspx")
    End Sub

    Sub ImgEdit_Click(sender As Object, e As ImageClickEventArgs)
    Response.Redirect("/updatenews.aspx?id="&NewsID)
    End Sub

    Sub ImgDelete_Click(sender As Object, e As ImageClickEventArgs)
    Response.Redirect("/deletenews.aspx?id="&NewsID)
    End Sub

</script>
<asp:Panel id="Panel1" Height="14px" Width="200px" runat="server">
    <asp:ImageButton id="ImgAdd" onclick="ImgAdd_click" runat="server" Visible="False" ImageUrl="/images/add.jpg"></asp:ImageButton>
    <asp:ImageButton id="ImgEdit" onclick="ImgEdit_click" runat="server" Visible="False" ImageUrl="/images/edit.gif"></asp:ImageButton>
    <asp:ImageButton id="ImgDelete" onclick="ImgDelete_click" runat="server" Visible="False" ImageUrl="/images/trash.gif"></asp:ImageButton>
</asp:Panel>