Subversion Repositories DevTools

Rev

Rev 6594 | Rev 6623 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6594 Rev 6610
Line 326... Line 326...
326 
<%
 326 
<%
327 
Sub Print_TopRight_Menu_ROW1
 327 
Sub Print_TopRight_Menu_ROW1
328 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='26'>"
 328 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='26'>"
329 
   Response.write "  <tr class='nowrap'> "
 329 
   Response.write "  <tr class='nowrap'> "
330 
   If objAccessControl.UserLogedIn Then
 330 
   If objAccessControl.UserLogedIn Then
331 
      Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()""><img src='images/i_user.gif' border='0' hspace='3'>"&  objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
 331 
      Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">" & enum_imgUserLg & objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
332 
   Else
 332 
   Else
333 
      Response.write "    <td class='mmEntry'><a class=mmItem href='Login.asp?rfile=" & scriptName & QSTR_FullQuery & "' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">Login</a>&nbsp;&nbsp;</td>"
 333 
      Response.write "    <td class='mmEntry'><a class=mmItem href='Login.asp?rfile=" & scriptName & QSTR_FullQuery & "' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">Login</a>&nbsp;&nbsp;</td>"
334 
   End If
 334 
   End If
335 
   Response.write "   <td align=middle>|</td>"
 335 
   Response.write "   <td align=middle>|</td>"
336 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"
 336 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"