Subversion Repositories DevTools

<%
'===================================================================
'                  Main Menu
'===================================================================
%>
<%
'------------ VARIABLE DEFINITION -------------
'------------ CONSTANTS DECLARATION -----------
'------------ VARIABLE INIT -------------------
'----------------------------------------------
%>
<%

'------------ RUN BEFORE CONTROL RENDER -------
'----------------------------------------------
%>
<script language="JavaScript1.2">
    // ---- Popup menu definition ----
    var linkset=new Array()
    linkset[[0]]=''
    linkset[[0]]+='<div class="menuitems"><a href="Wikiasp/wiki.asp" target="_blank">Release&nbsp;Notes</a></div>'
    <%If (IsEmpty(Application("LiveSystem"))) Then%>
    linkset[[0]]+='<div class="menuitems"><a href="Wikiasp/wiki.asp?db=ImplementationNotes" target="_blank">Development&nbsp;Notes</a></div>'
    <%End If%>
    linkset[[0]]+='<div class="menuitems"><a href="_about.asp" target="_blank">About</a></div>'

    linkset[1] = ''
    linkset[1]+='<div class="menuitems"><a target="_blank" href="<%=ACCESS_MANAGER_URL%>">Access&nbsp;Manager</a></div>'
    linkset[1]+='<div class="menuitems"><a target="_blank" href="<%=DEPLOYMENT_MANAGER_URL%>">Deployment&nbsp;Manager</a></div>'
    linkset[1]+='<div class="menuitems"><a target="_blank" href="<%=PRODUCTION_MANAGER_URL%>">Production&nbsp;Manager</a></div>'
    linkset[1]+='<div class="menuitems"><a target="_blank" href="<%=RELEASE_MANAGER_URL%>">Release&nbsp;Manager</a></div>'

    linkset[2]=''
    <%If Not objAccessControl.UserLogedIn Then%>
       linkset[2]+='<div class="menuitems"><a href="Login.asp">Login</a></div>'
       linkset[2]+='<div class="menuitemDisable">Logout</div>'
    <%Else%>
       linkset[2]+='<div class="menuitems"><a href="Login.asp">Login as ...</a></div>'
       linkset[2]+='<div class="menuitems"><a href="_Logout.asp">Logout</a></div>'
    <%End If%>
</script>
<script language="JavaScript1.2" src="images/popup_menu.js?ver=<%=VixVerNum%>"></script>

<table width="100%"  border="0" cellspacing="0" cellpadding="8">
   <tr>
      <td nowrap bgcolor="#FFFFFF" class="menu_crumbtxt">&nbsp;&nbsp;&nbsp;</td>
      <td align="right" nowrap bgcolor="#FFFFFF" class="body_txt">
         <a href="#" class="mmenu_link" onMouseover="showmenu(event,linkset[2])" onMouseout="delayhidemenu()">
            <img src='images/i_user.gif' border='0' hspace='3' align="absmiddle">
            <%=objAccessControl.FullName%>
         </a>
        &nbsp;&nbsp;|&nbsp;&nbsp;
                <a href="AdminDefault.asp" class="menu_link">Configuration</a>
        &nbsp;&nbsp;|&nbsp;&nbsp;
        <a class=mmenu_link href='' onMouseover="showmenu(event,linkset[1])" onMouseout="delayhidemenu()">Suite</a>
        &nbsp;&nbsp;|&nbsp;&nbsp;
        <a class=mmenu_link href='' onMouseover="showmenu(event,linkset[0])" onMouseout="delayhidemenu()">Help</a>
        &nbsp;&nbsp;
      </td>
   </tr>
</table>
<%
'------------ RUN AFTER CONTROL RENDER --------
'----------------------------------------------
%>