Subversion Repositories DevTools

Rev

Rev 5357 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 5357 Rev 5360
Line 276... Line 276...
276 
<%
 276 
<%
277 
Sub Print_TopRight_Menu_ROW1
 277 
Sub Print_TopRight_Menu_ROW1
278 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='26'>"
 278 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='26'>"
279 
   Response.write "  <tr> "
 279 
   Response.write "  <tr> "
280 
   If objAccessControl.UserLogedIn Then
 280 
   If objAccessControl.UserLogedIn Then
281 
      Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()""><img src='images/i_user.gif' border='0' hspace='3'>"&  objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
 281 
      Response.write "    <td class='mmEntry'><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()""><img src='images/i_user.gif' border='0' hspace='3'>"&  objAccessControl.FullName &"</a>&nbsp;&nbsp;</td>"
282 
   Else
 282 
   Else
283 
      Response.write "    <td align=middle noWrap valign=center><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">My Account</a>&nbsp;&nbsp;</td>"
 283 
      Response.write "    <td class='mmEntry'><a class=mmItem href='members_index.asp' onMouseover=""showmenu(event,linkset[5])"" onMouseout=""delayhidemenu()"">My Account</a>&nbsp;&nbsp;</td>"
284 
   End If
 284 
   End If
285 
   Response.write "   <td align=middle>|</td>"
 285 
   Response.write "   <td align=middle>|</td>"
286 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"
 286 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[1])"" onMouseout=""delayhidemenu()"">Suite</a></td>"
287 
   Response.write "   <td align=middle>|</td>"
 287 
   Response.write "   <td align=middle>|</td>"
288 
   If InStr(1,ScriptName,"sdk_", 1) <> 0 Then
 288 
   If InStr(1,ScriptName,"sdk_", 1) <> 0 Then
289 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='index.asp'>Releases</a></td>"
 289 
   Response.write "    <td class='mmEntry'><a class=mmItem href='index.asp'>Releases</a></td>"
290 
   Response.write "   <td align=middle>|</td>"
 290 
   Response.write "   <td align=middle>|</td>"
291 
   Else
 291 
   Else
292 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='sdk_main_page.asp#url=sdk_names_body.asp'>SDK</a></td>"
 292 
   Response.write "    <td class='mmEntry'><a class=mmItem href='sdk_main_page.asp#url=sdk_names_body.asp'>SDK</a></td>"
293 
   Response.write "   <td align=middle>|</td>"
 293 
   Response.write "   <td align=middle>|</td>"
294 
   End If
 294 
   End If
295 
   Response.write "   <td align=middle noWrap valign=center width='70'><a class=mmItem href='index.asp' onMouseover=""showmenu(event,linkset[0])"" onMouseout=""delayhidemenu()"">Projects</a></td>"
 295 
   Response.write "   <td class='mmEntry'><a class=mmItem href='index.asp' onMouseover=""showmenu(event,linkset[0])"" onMouseout=""delayhidemenu()"">Projects</a></td>"
296 
   Response.write "   <td align=middle>|</td>"
 296 
   Response.write "   <td align=middle>|</td>"
297 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='reports.asp'>Reports</a></td>"
 297 
   Response.write "    <td class='mmEntry'><a class=mmItem href='reports.asp'>Reports</a></td>"
298 
   Response.write "   <td align=middle>|</td>"
 298 
   Response.write "   <td align=middle>|</td>"
299 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[8])"" onMouseout=""delayhidemenu()"">Build</a></td>"
 299 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[8])"" onMouseout=""delayhidemenu()"">Build</a></td>"
300 
   Response.write "   <td align=middle>|</td>"
 300 
   Response.write "   <td align=middle>|</td>"
301 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[6])"" onMouseout=""delayhidemenu()"">Admin</a></td>"
 301 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[6])"" onMouseout=""delayhidemenu()"">Admin</a></td>"
302 
   Response.write "   <td align=middle>|</td>"
 302 
   Response.write "   <td align=middle>|</td>"
303 
   Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[9])"" onMouseout=""delayhidemenu()"">Help</a></td>"
 303 
   Response.write "    <td class='mmEntry'><a class=mmItem href='' onMouseover=""showmenu(event,linkset[9])"" onMouseout=""delayhidemenu()"">Help</a></td>"
304 
   Response.write "  </tr>"
 304 
   Response.write "  </tr>"
305 
   Response.write "</table>"
 305 
   Response.write "</table>"
306 
End Sub
 306 
End Sub
307 
 
 307 
 
308 
 
 308 
 
Line 310... Line 310...
310 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
 310 
   Response.write "<table bgcolor='#ffffff' border='0' cellpadding='0' cellspacing='0' height='35'>"
311 
   Response.write "  <tr> "
 311 
   Response.write "  <tr> "
312 
   If QStrPar("rtag_id") <> "" Then
 312 
   If QStrPar("rtag_id") <> "" Then
313 
       Dim lxrContent : lxrContent = RenderLxrStateString(releaseInfoHash("rtag_id"),releaseInfoHash("lxr"),releaseInfoHash("lxrserver"), releaseInfoHash("official")," LXR")
 313 
       Dim lxrContent : lxrContent = RenderLxrStateString(releaseInfoHash("rtag_id"),releaseInfoHash("lxr"),releaseInfoHash("lxrserver"), releaseInfoHash("official")," LXR")
314 
      If lxrContent <> "" Then
 314 
      If lxrContent <> "" Then
315 
        Response.write "   <td align=middle noWrap valign=center width='70'>"& lxrContent &"</td>"
 315 
        Response.write "   <td class='mmEntry'>"& lxrContent &"</td>"
316 
        Response.write "   <td align=middle>|</td>"
 316 
        Response.write "   <td align=middle>|</td>"
317 
      End If
 317 
      End If
318 
      Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[2])"" onMouseout=""delayhidemenu()"">Release</a></td>"
 318 
      Response.write "    <td class='mmEntry'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[2])"" onMouseout=""delayhidemenu()"">Release</a></td>"
319 
      Response.write "   <td align=middle>|</td>"
 319 
      Response.write "    <td align=middle>|</td>"
320 
      Response.write "    <td align=middle noWrap valign=center width='70'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[7])"" onMouseout=""delayhidemenu()"">Build</a></td>"
 320 
      Response.write "    <td class='mmEntry'><a class=mmItem href='#' onMouseover=""showmenu(event,linkset[7])"" onMouseout=""delayhidemenu()"">Build</a></td>"
321 
   Else
 321 
   Else
322 
      Response.write "    <td align=middle noWrap valign=center  width='70'class=mmItemDisable>Release</td>"
 322 
      Response.write "    <td class='mmEntry mmItemDisable'>Release</td>"
323 
      Response.write "   <td align=middle>|</td>"
 323 
      Response.write "    <td align=middle>|</td>"
324 
      Response.write "    <td align=middle noWrap valign=center  width='70'class=mmItemDisable>Build</td>"
 324 
      Response.write "    <td class='mmEntry mmItemDisable'>Build</td>"
325 
   End If
 325 
   End If
326 
   Response.write "  </tr>"
 326 
   Response.write "  </tr>"
327 
   Response.write "</table>"
 327 
   Response.write "</table>"
328 
End Sub
 328 
End Sub
329 
 
 329